



CARD READER DIAGNOSTIC EP-DZCDB-B-DL-B OCT 1977 
C D1 1 /C D20 MD-11-DZCDB-B COPYRIGHT © 76-1977 BUSOU 
FICHE1OF2 MADEIN USA 


ead 
























: | if " jusne 
aE i : i neas : 
. . Lb 
aamae we} : hone 
eRSrERaTaL> se} ; peas! 
eee | L iapee 
4 a ; | +7 : seane 
my a Pre Ler a a = ad > - a -- a 1 tee ; “ is ar i lB '® = | i t e548 
eens —s - = . — 
= _ — % Ls r 7 4 7 — - > So r - 1. =o -y 1 * 
i® » (= Pie ee ee eerie : At | das ith 
: ae sa <= S.-i oe S. > atk — ; a ; ny qh 
ef oo oy ee ae — ~ ao - =m ~ at | , : ; }! { PEL ALE 
wT -- we OT er <a ~: aS T r L ~~ ; ] Tika sue 
et 7 . a x wor = , _ be | } jer , - ; 
Rae. a: aan. ee 7 ae we, oe ENE f ’ ti ee i i } | BEER 1 pur 
Sr. pa Es - a .. ee / ‘| % it 1 Tre ieee 
. area er *- = ~ A itl ao . ; + 4 4 Fi a ihe 7. yan 
3 A : me on) 6 ti: i Agee eent 


= - 5 - : ina ORY an 


NRE iw + == an SW = 


+ | 
we 
or 
“Ti 





ine T i 
—- Pf. ed ar jes : ~ 
<= al i _ 4 | inoue . 
ee erie , “ir : i; a. tesa ae geet 
=. = rT Ly jean: 











a5 Ls . d 
Sen ss eee 3 ope : o “te RF 97 ing i: = ie iF NT a = 1a Bae: len 
D * wo we ~ Z ae ae : 7) oe ni a ima? be Saues fee oe : ob b 
we oe eal <2 = = rie oe oe | Se i 4 == We Th TT 
5 a as emwen < ae r - a | nei cemeiag ] ;= . ! th 
waa eae Fane oer ee) a wee } Hs D fli Sa ms 8 ' L L 
aio 35m ‘ a . = | ——— ao — LE ad ' fo 
Peale RUPE - os ; ; ‘4 | ss =< 
Ee ‘ ui | ive : ihe iE “ 2 “spl iP “ i] | 
= wa nm ite Bir v ‘4 x 
oN S38 9 
rus — bs ; 58 ge : 188 ge" wees iki ry Lo 
: : : - exr , =a LE + u i : ; tn 
_ si 7 ote ’ j a ~ e an a 1 | 
aa ; i: e % } t ' 
n= - ae be re : - [ 
if 4 if | 
7 + tie | oa | 
as a os ed eae be ; 
= ca ee Sit a fa = ; 





peer ere 


CD11/CD20 —weitozcbe's” Comey eter HIRED 


. FICHE 20F2 MADEINUSA 


—————— a 
. ee rm — 











BO1 


00010000 770920 IDENTIFICATIBBPIO 411 IZHDR 10Z2CDBBSE@ 


PRODUCT CODE: MAINDEC-11-DZCDB-B-D 
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HY PREREQUISITES 


_ PaO EROCEDURES 


eee te DANE foe 
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A ‘or 


RONMENTS 


ERROR REPORTING. PROCEDURE 


DATA Heute nberes tre leslie 
OPERATION 
HALTS 
PERFORMANCE AND PROGRESS REPORTS 


pevice ORTON eee S 
CURRENT 







GISTER ( Ait 
REGISTER (177164) 
REGISTER (177166) 


a ee eee 


ING A SINGLE DATA PA 
LOOPING ON A SELECTED Test 


HISTORY 
FLOW CHARTS 
PROGRAM LISTING 





COl 


SEQ 0002 


1.0 


1.1 


1.2 


DOI 


GENERAL PROGRAM INFORMATION 


SO EEE EE EE ED —_——_ ae ee wr @w@wronrm 


gg me aa Ps 
OA tet Mi BOR A SO OER’ 


SING & Bineery CODED ED DATA oe 
es tater Wie es ‘. ne bas Le Rie 


OF CARD DECKS W OF EACH CARD 


ae coat or Cot APR coe "ey READER INTERFACES 


THE IC_AND BINARY rest DECKS TO BE USED ILL BE 
DESCRIBED IN SECTION 1.2, PARAGRAPH B. 


SYSTEM REQUIREMENTS 







A. HARDWARE REQUIREMENTS 
A PDP-11 FAMILY COMPUTER WITH EITHER A CD11 OR CD20 
READER A 


CARD 
DOCUMATION MODEL CARD READER (MODELS 
M200, M1000, M1200, RS1200). 


1. a oe if 11 I wee WITH 
if NTERFACE IS 
WITH Pa COMPUTERS. THE 
INTO THE 


Vive FOLLOWING AQOIT ONAL SOF THARE 
CONTROLLER: 
A. bynine bate gas ene OE OS 16 THU, 
a folate tees beige ab TES 
B. shite nate a TH DATA REGISTER 
bieetee? WTS USED 6S. AS As a ND STATUS REGISTER WITH 


BIT DEFINITION 


15 ALWAYS SET IF ECO IS INSTALLED 
14 ALWAYS CLEAR IF ECO NOT INSTALLED 


14 READ CHECK ! BREAKOUT OF BIT14 OF 
13 PICK CHECK ! STATUS REGISTER 
le STACK CHECK ! (177160) 


SEG 0003 





1.3 


1.4 


1.5 


SOFTWARE REQUIREMENTS 
TWO MAIN CARD TEST DECKS ARE REQUIRED BY THIS PROGRAM: 
ALPHANUMERIC DECK BINARY DECK 





MAINDEC-89-D1B1-C MAINDEC-89-DiBe-C 


ON OEM MPS REGISTERED CARD 1s ALSO AEQUIRED(FOR RS1200 ONLY).. 


RELATED DOCUMENTS AND STANDARDS 


ee. 





Tots Azote THAT BOTH CARD TEST DECKS ARE IN THEIR PROPER 
. IT IS A GOOD IDEA UPON RECEIVING THE TEST DECKS 
ae an IN THE TOP RIGHT CORNER IN THE EVENT THAT 
THEY ACCIDENTLY DROPPED. 


IT IS ASSUMED THAT ECO s#CD-11-00014 HAS BEEN INSTALLED 
wen eae PROGRAM IS BEING RUN ON A DECSYSTEM 20 SERIES 





SE@ 0004 


e.0 


2.1 


FO] 


OPERATING INSTRUCTIONS 


LOADING AND STARTING PROCEDURES 


oH ST RATING G AOD SECTIONS TO THE PROGRAM EACH HAVING 
rESS, 3h » suLIGh SETTINGS, AND MODES OF 


A. INSTRUCTION & DATA RELIABILITY 


i. 


7m sw 


NOTE: 


LOAD PROGRAM INTO MEMORY. ON A DECSYSTEM 20 SERIES 
warowe- O ACCOMPLISHED VIA A *FLOPPY’ DISKETTE 


1ST- ees THE *FLOPPY’ SWITCH (ON FRONT END 
0 LOAD ’RXDP’ (FLOPPY MONITOR) 


2ND- TYPING ’DZCDB%’ (CARRIAGE RETURN) ON CONSOLE 
TTY IN RESPONSE 4d THE ’RXDP’ MONITOR REQUEST 
FOR INPUT (A DOT.) 

WHERE * = LATEST REV. LETTER OF THE PROGRAM 


LOAD A TEST DECK (ALPHANUMERIC OR BINARY) INTO THE 
CARD READER INPUT HOPPER 


PRESS ’RESET’ BUTTON ON THE CARD READER 

SET A STARTING ADDRESS OF 200 INTO SWITCH REGISTER 
PRESS *LOAD ADDRESS’ 

SET SWITCHES FOR MODE OF OPERATION: 


RS: BER: PEWS)” ST SEE 


*BINARY’ DECK (IMAGE MODE) - SET SW<O2> & SW<O4> 
"BINARY’ DECK ( MODE) - SET SW<03> & SW<O04 


wate on te Pia SWITCHES SET FOR MODE OF Sal ION 
LL PASS THRU THE I TION PORT 

ONLY ONCE (1ST PASS). ON ALL PASSES T 

PROGRAM WI OOP ON THE DATA RELIABILITY PORTION. 

ALTER THIS APPROACH SET OTHER SWITCHES AS INDICATED 

UNDER SECTION 2.3. 


SEQ@ 0005 


Fe 





PRESS *START’ 
OY Bt I PEAT SELLA MOLES © 


MAINDEC-11-DZCDB REV.B 


SEQ 0006 


ENTERING LOGIC TESTS 
ENTERING DATA TESTS 
END PASS #1 
TH 
T 


AT THIS POINT THE INPUT HOPPER SHOULD BE EMPTY * 
ge PROGRAM WILL HANG WAITING, AT WHICH % 


# 
A. RELOAD TEST DECK/S INTO INPUT HOPPER, AND 
B. PRESS RESET’ ON CARD ¥ 
PROGRAM SHOULD RESUME OPERATION WITH, z 


ENTERING DATA TESTS 
END PASS #e 


WK OK MC OK ORC ik 


ETC. 


NOTE: M3 At OF THE PRINTOUT WILL VARY AS OTHER SWITCHES 


8. ERROR FUNCTIONS FOR CARD READER MODELS Me00 OR M1000 


3. 
4. 
s. 
6. 


INTO AS INDICATED BY SECTION e.1, 
PARAGRAPH A, SUBPARAGRAPH 1. 


LOAD A FEW SPARE CARDS INTO THE INPUT HOPPER. 


NOTE: DO NOT LOAD A TEST DECK HERE AS PORTIONS OF 
ERROR FUNCTION TESTING DESTROYS CARDS 


PRESS ’RESET’ BUTTON ON THE CARD READER 

SET A STARTING ADDRESS OF 210 INTO SWITCH REGISTER. 
PRESS *LOAD ADDRESS’ 

SET DESIRED SWITCHES AS INDICATED BY SECTION 2.3 





ve 
8. 


HO1 


PRESS ’START’ 

FOLLOW THE INSTRUCTIONS AS THEY ARE PRINTED OUT 

A PUL COPE): OF THIS SECTION SHOULD APPEAR AS FOLLOWS 
ENTERING MiO00/M200 ERROR FUNCTION TESTS 
AAINDEC=11-DZC0B REV.B 


‘ INS TIONS FOLLOW AND UPON A COMPLETE PASS > 
% WILL . £ 


MAINDEC-11-DZCDB REV.B 


ETC. 


C, ERROR FUNCTIONS FOR CARD READER MODEL M1200 OR RS1200 
VERYTHING wre AS INDICATED UNDER SECTION 2.1, 
B., XEEPT : 


1, 


START ADDRESS IS 250, AND 
BEng in UPON EXECUTION IS “ENTERING M1200 ERROR 
UNCTION TESTS” 


eer THE QUESTION “M1200 OR RS1200" BY TYPING 
AY BR THE RE1z00 OR ANN FOR THE M1200. 


NOTE: Sis ony Y THE RS1200 HAS THE CAPABILITY 
0 DETECT A MIS-REGISTERED CARD, ONLY THIS 
OD ENTER THE MISTERED CARD TEST. 


SINGLE SUBTEST LOOP 


1. LOAD PROGRAM INTO MEMORY AS INDICATED BY SECTION e.1, 
PARAGRAPH A., SUBPARAGRAPH 1. 


e. 


rrr 


LOAD A FEW SPARE CARDS INTO THE INPUT HOPPER 


Ais THE aNS TRUS ON PORTION OF 3 
CTED UNDER THIS 
TEST DECK MAY "BE 


SUBSTITU IN "eAce OF THE SPARE CARDS. 
PRESS RESET’ BUTTON ON THE CARD READER 
SET A STARTING ADDRESS OF 220 INTO SWITCH REGISTER 
PRESS "LOAD ADDRESS’ 


AT ha 1ST HALT’: 
L STARTING ADDRESS OF THE DESIRED TEST (ADDRESS 
TE RUC TION AT BEGINNING OF TEST), THEN 


— *HALT’: 
ae SIRED SWITCHES AS INDICATED BY SECTION 2.3 


SEQ 0007 


LL LLL LLL LLL LLL 


(SW<11> MUST NOT BE SET), THEN PRESS *CONTINUE’ 
#%% HOWEVER *##* (SW<14> MUST BE SET... MUST BE SET ...) SEQ 0008 


8. PROGRAM WILL LOOP ON TEST SELECTED 





JOl 
E. SINGLE DATA PATTERN TEST 


1. INT AS INDICATED BY SECTION e.1, 
PRRBCREPH A, SUBPARAGRAPH 1. 


2. LOAD A ’PREPARED’ DECK INTO THE INPUT HOPPER 


* Bea ae OE 


eat Can ik RL ine 
THE DECK 


CE. (6.6. IF P COLLAR 1 CONTAINS M777 SO MUST ALL 


PRESS ’RESET’ BUTTON ON THE CARD READER 

SET A STARTING ADDRESS OF 240 INTO SWITCH REGISTER 
PRESS *LOAD ADDRESS’ 

PRESS ’START’ 


&, 
Set TRE ATA’ PATTERN SELECTED INTO THE SWITCH REGISTER 
(11 THRU 00>, THEN PRESS *CONTINUE’ 


8. AT THE @ND ’HALT’ 
SET DESIRED SWITCHES AS INDICATED BY SECTION e.3 


GARD R_RUNS OUT OF CARDS RELOAD THE 

: ’ DECK PRESS ’RESET’ BUTTON ON THE CARD 
10. THE PROGRAM SHOULD CONTINUE 

2.2 SPECIAL ENVIRONMENTS 


My. as es gh HAVE THE CAPABILITY TO BE RUN ON THE ACT-11 
‘ BUT IS NOT IDEALLY SUITED FOR THIS 
SRY NVIRONMENT DUE TO THE PROGRAM’S REQUIREMENT OF LOADING CARD 


DECKS. 


NEN so 


= 


SEQ 0009 


KO1 


2.3 PROGRAM OPTIONS 


A. DEFAULT PARAMETERS 


LOCATION LABEL CONTENTS = 
cost: 177160 STATUS 
: 177162 COLUMN COUNT 
77 ike Bata’ ak: ON CD20) 
INTVEC: INTERRUPT 
INTVEC#2: 232 INTERRUPT PS 


eS HARRIS STASI EF RELDS FE 


BEFORE ATTERPYING 10 EX TO EXECUT CUTE THE PROGRAR R0 RAR. CORRECT 


B. CONTROL SWITCH SETTINGS 


SWITCH USE 
(15>=1] HALT ON ERROR 
(15>=0 CONTINUE ON ERROR 
«14> T 
Bi3=S == COranUe TO Next TEST 
SW<19>=1 INHIBIT ERROR PRINTOUT 
SW<13>=0 PRINT ERROR REPORTS 
(le>=1 tie a TRACE TRAPPING 
(12>=0 ALLOW TRACE TRAPPING 
(l)>= INHIBIT TEST 1 TIONS 
aucli>=0 ALL -TEST ITERATIONS 
SW<07>=1 LOOP ON INSTRUCTION TESTS ONLY 
SW<07>=0 NOT APPLICABLE 
SW<06>=1 ee N SOnTIIUING & Ble. gt. | 
DECK 10 ANOTHER 
SW<06>=0 AD ST CARD TEST. RELIABILITY = 
lepit try Tes TC 


T CARD TEST DECK LOADS. 


SEQ 0010 





LO] 





SW<0S>=1 WHEN MORE THAN ONE CARD TEST DECK IS 
LOOPED T’ Soe ot « eter. SEQ 0011 
ON * HALT’ 
SW< 05> =0 
Te Aan eRe AIL, 
SW< 04> =1 INDICATOR FOR BINARY TEST DECK 
Sid< 04) =0 NOT BINARY TEST DECK 
(03> ICATOR PACK MODE 
SB PTA Be 
SW<02>=1 INDICATOR FOR IMAGE MODE 
Su< 02> =0 NOT IMAGE MODE 
C. STARTING ADDRESSES 
ADDRESS USE 
200 INSTRUCTION & DATA RELIABILITY TESTING 
210 ERROR FUNCTION TESTING OF CARD READER 
MODELS M200 OR M1000 
220 LOOPING ON A SINGLE INSTRUCTION TEST 
240 READING A SINGLE DATA PATTERN 
CONTINUOUSLY 
250 ERROR FUNCTION TESTING OF CARD READER 
MODEL M1200 OR RS1200 


2.4 EXECUTION TIMES 


(TO BE DETERMINED) 


i 











Mol 
3.0 ERROR INFORMATION 
ieomagtagt SEQ O012 


3.1 ERROR REPORTING PROCEDURES 


THREE TYPES OF ERROR REPORTING TECHNIQUES ARE USED AS FOLLOWS: 
A. WHEN INPUT HOPPER GOES EMPTY DURING TESTING 
THE FOLLOWING MESSAGE IS TYPED: 


Re a ME AE A BB sos is 
wa ea we a tae 


WILL hs To Reser acptliape 


B. DURING DATA patch ae 
THE FOLLOWING FORMAT IS TYPED WHEN A DATA ERROR OCCURS: 
DECK CARD NUM CARD COL SHB WAS 
WHERE: ‘DECK’ REPRESENTS EITHER ‘ALPHA’ OR ’BINARY’ 


ci ich pr ss FOUND. Cond ur 
cSeecIP ED BY mo, a — 


THE VALUE THAT SHOULD 
of ieenteD. 
'WAS’ REPRESENTS THE VALUE THAT WAS INTERPRETED. 















C. GENERAL ERRORS DURING PROGRAM OPERATION 


TbchBor HE PRtckan ns FoLLows: SPOTS ON OS 
TYPE 1 


(SP) 


(SP) 


(SP) 


(SP) 


(SP) 


(SP) 


(CDS) 


(COS) 


(COS) 


(COS) 


(CDS) 


(CDS) 


(CDS) 


(COD) 
(COD) 
(COD) 
(CDD> 


(CD) 


‘COD) 


sf 


(PS) 


(COC) 


(CDA) 


(CDC) 


NO1 


(PS) 

(PS) 

(CDA) (PS) 
(CDA) (CDA) 


(PS) 


SEQ 0013 


BOe 
eR: > SS he Sh SEE 


(SP) REPRESENTS THE CURRENT a. thes OF THE STACK 
POINTER (GENERAL PURPOSE REGISTER 6) 


TEES 
ATUS (177160) 

) 
DATA ‘ ae fon Ts, ine Be "DURING 
DATA sia eie ee 
WHI (1 


AS ie. NOR-DATAT TRANSFER 

PERIODS. eREFERENCE by 

CARD READER COLUMN C COUNT GN REGISTER Th 

S28 SRE iL HAL 

SL SN ELAR LIME 
ATUS REGI (177776) 


’ REPRESENTS THE INCORRECT VALUE FOUND 


WAS 
We ote Foe: THE CORRECT VALUE THAT SHOULD 









a. ALL UNUSED LOCATIONS FROM LOCATION ae TO LOCATION 776 CONTAINS 
Poeatton b COMBINE” 0 TO CATCH THEROPERL Y PORDED ye ag ap 
LOCATION CONTENTS 

0 HALT 

4 6 

6 HALT 

10 le 

12 HALT 
ETC. 


WHEN SW<15>=1 INDICATING TO HALT ON ERROR 


C. DURING ERROR FUNCTION TESTING OF READ CHECK, WHEN AN 
i T DOES NOT OCCUR AFTER CARDS HAVE BEEN RESTORED 
INPUT HO SOPPER PER END THE ’RESET’ BUTTON ON THE CARD 





SES 0014 





COe 


D. IF THERE IS NO TERMINAL TO OUTPUT INFORMATION 
SEQ 0015 


E. A POWER FAILURE IF THE POWER UP SEQUENCE WAS STARTED 
BEFORE THE POWER DOWN SEQUENCE HAD COMPLETED. 


A. STATUS REGISTER (177160) BIT DESIGNATIONS 





BIT DESIGNATION MODE 
0 WRITE 
‘ READ/WRITE 
3 ON-LINE READ 
4 (BIT16) /WRITE 
5 (BIT17) /WRITE 
6 /WRITE 
7 READ 
: WRITE 
READ 
10 READ 
4 ai a en 
i (M1200/RS1200 ONLY) READ 
(READ, STACK OR PICK) READ 
15 ERROR READ 


B. COLUMN COUNT REGISTER (177162) BIT DESIGNATIONS 
BITS <15:0> CONTAIN THE 2’S COMPLEMENT OF THE NUMBER OF 
COLUMNS TO BE T WHEN ARE BEING 
EACH TIME COLUMN 
TIME A COLUMN 
INHIBITED WHEN THE 


OF THIS REGISTER 15 INGRENENIED GY 

TH GI I l 

Ano ALT 1S Aged 0. 
ALL BITS ARE READ/WRITE. 


CONTENTS OF THIS RE 
C. CURRENT ADDRESS REGISTER (177164) BIT DESIGNATIONS 


BITS <15:0> CONTAIN THE MEMORY ADDRESS INTO WHICH 
OF oan ae TO BE STORED. THIS REGISTER I 






T 
INITIALLY SET 


S I 
OCATION OF THE 1ST COLUMN TO BE READ. IT T 
N PACK ; BY 2 FOR T 


TO 
INCRERENTS BY 1 FOR 3 
IN NON-PACK MODE. ALL BITS ARE READ/WRITE. 





1. NON-PACK MODE (CD11/CDE0) 






( 


2. PACK MODE (CD11/CD20) 


( 
Ck CHECK (CD20 ONLY) 
CK (CD20 ONLY) 


D. DATA BUFFER REGISTER (177166) BIT DESIGNATIONS (READ ONLY) 


CTIVELY 
Y) 
Y) 


7 ZONE le 
ZONE 11 

S ZONE 0 

4 ZONE 9 

3 ZONE 8 

Bits 2 THRU O REPRESENT AN OCTAL CODE ENCODED 
FOLLOWS: 

BIT BIT BIT CARD 

02 01 ZONE 
0 0 0 ZONES 1-7 
ee i 
0 l 1 ONE 5 
1 0 0 Z 4 
1 0 1 Z 5 
1 1 0 ZONE 6 
1 l 1 ZONE 7 


BITS 8 THRU 15 ARE UNUSED. 


SEG O016 





EOe 


SUB-TEST SUMMARIES 


INSTRUCTION TESTS TESTS 


ees 





COUNT REGISTER 
Te CDS (177: 
0 BE CLEAR AF 


va Aang , 
FER CARD READ 


DATA RELIABILITY TEST 


I ARR Le oe em 


oe Lea mpeg SI ENR HELEN 
Bas hed Seana 


B NARY 
THE BINARY TABLE IN THE PROGRAM LISTING, (BEGINNING 
Q LABEL *BINCD:’) FOR THE BINARY CODES PUNCHED IN THE 80. 
T 1ST CARD. N MIND THE ZONE ENCODING 
IN SECTION 5 0). EACH SSIVE 
N DECK USES THE SAME SEQUENCE OF CODES ROTATED 
ONE TO THE LEFT. THE PACKED FORM OF THE BINARY CODES 
FOLLOWS THE ’BINCD:’ TABLE 


SE@ 0017 


FOe 


ERROR FUNCTION TESTS FOR M1000/M200/M1200/RS1200 
SEQ 0018 


@o-_—s* OEE EBB BBB LEE LLL LLL LE LL LE LS EP 






BITS 
0 INE TRANSITION 


ACK CHECK ERROR 
OF F HOPPER CHECK (M1200/RS1200 ONLY) 
CHECK ERROR 


INSTRUCTIONS FOR MAKING A MIS-REGISTERED CARD 


A CT ABOUT THE SIZE OF A NORMAL 

ER ATGLARK CARD. MAKE SURE THE LEADING 
EDGE HOLE FALLS IN A POSITION WHICH IS NORMALLY 
CONSIDERED TO BE OUT OF REGISTRATION. (BETWEEN MARKED COLUMNS) 


6.4 


6.5 


7.0 


8.0 


9.0 


GOe 
READING A SINGLE DATA PATTERN 


FUERSAE aS AC oMtne sPecteye r¥PES oF. Bata £ FAILURES 10 Be 


MORE EASILY STUDIED. 


: ree Pees BCE wn 
Ariane gee pha aa 


C BE ek 








Aad ON Bee (I. f ? BUTTON). SREPERENCE. 


LOOPING ON A SELECTED TEST 


ee 3 BY SELECTING 


THe Te OWS A SINGLE SUB-TEST TO BE RUN C 
T OPE. INSTRUCT PORTION ONLY) AND LOADING THE ADDRESS 
TRUCTION AT THE BEGINNING OF THE TEST. (REFERENCE SECTION c.1, 
HISTORY 
FLOW CHARTS 


SE@ 0019 


: 
’ 
‘ 
- 


HOe 


THIS IS A HISTORY OF THE DEVELOPMENT OF MAINDEC-11-D2CDB 


PRODUCT CODE: 4) age ll 


PRODUCT NAME : CD11/CD20 CARD READER DIAGNOSTIC 
ORIGINAL RELEASE: MARCH 21 1976 
ORIGINAL AUTHOR: BRUCE BURGESS 


96-96 6 AE Ae SE SE 0 SE SE SE HE HE HE EEE 


PRODUCT CODE: NAINDEC-11-D2C08-8 
PRODUCT NAME : CD11/CD20 CARD READER DIAGNOSTIC 


DATE RELEASED: MAY 1977 
UPDATE AUTHOR: GREG GLEZMAN 


TES: 
— ADDED TEST FOR MONITOR PRESENCE. 


e. A HALT _TO ALLOW THE ye adhd TO SET THE SR 
CUITCHES IN THE CASE OF NO MONITOR 


3. FIXED THE aloe BYTE) LOAD TESTS FOR THE 
COC AND REGISTERS SO THEY FUNCTION WITHOUT ERROR. 


= 10 Test FORA. Ris REGISTERED CARO. eats 
. FH PROGRAN faa ry TEST AN RS1200 CARD READER. 


We Neanee TO THE OPERATOR PERTAINING TO THE 
cfack CHEEK RROR TEST. THE CHANGE MAKES THE PROCEDURE 


SEQ 0020 


102 


CO11/CD20 CARD READER DIAGNOSTIC ; DECFLO VER 00.12 Ol1-JUL-77 08:4S PAGE A Seo 002 
] 


FLOW CHART 
SE SEE HE HEE HE Ee He HEE 
CD11/CD20 CARD READER DIAGNOSTIC 
He MME HEHEHE EE EEE 


C 1977 
DIGITAL EQUIPMENT CORPORATION 


CD11/CD20 CARD READER DIAGNOSTIC 


PAGE 02 
PAGE 03 
PAGE O4 
PAGE OS 
PAGE 06 
PAGE 07 
PAGE 08 
PAGE 09 
PAGE 10 
PAGE 11 
PAGE le 
PAGE 13 
PAGE 14 
PAGE 15 
PAGE 1E, 
PAGE 17 
PAGE 24 
PAGE 40 
PAGE 44 


J02 


TABLE OF CONTENTS 
EEEHELLEREEEEEEEEEE 


TEST FOR INIT. OF ALL REGISTERS 

TEST READ/WRITE STATUS REGISTER 

TEST READ/WRITE OF COLUMN COUNT REGISTER 

TEST READ/WRITE OF BUS ADDRESS REGISTER 

TEST CONTROLLER READY TO CLEAR BITO 

TEST BIT 2 TO BE CLEAR AFTER CARD READ 

TEST INTERRUPT FROM CONTROLLER READY 

TEST NO INTERRUPT ON CONTROLLER READY & CPU AT LEVEL 7 
TESTS FOR INTERRUPTS 

TEST FOR INTERRUPTS (CONT’D) 

SIMILTANEOUS INTERRUPTS AT MORE THAN ONE LEVEL 
NON-EXISIAI:T MEMORY DETECTION 

BYTE & DAT" LOAD OF COLUMN COUNT REGISTER 
WORD COUNT OVERFLOW TO 2ND CARD 

BUS ADDRESS ODD & TRANSFER IN NON-PACK MODE 
DATA RELIABILITY TESTING 

ERROR FUNCTION TESTING OF MODEL M1200 

PROGRAM TO LOOP ON SINGLE DATA PATTERN 
PROGRAM TO LOOP ON TEST 


DECFLO VER 00.12 O1-JUL-77 08:45 PAGE B 


SEQ 0022 


CD11/CD20 CARD READER DIAGNOSTIC DECFLO VER 00.12 O1-JUL-77 08:4S PAGE O01 eo coe 
Q 0023 


JE Se EEE EEE EE 
*BEGIN % START ADDRESS = 200 
HERE R EEE 


REGGE RARE RE EE EEE EEE 
: OR 4 


* “SUR” DETERMINATION | : 
renee — 


I 
Peete tte ttt titi toy 
* INITIALIZE # 
* POINTERS AND * 
x FLAGS x 
emmm: ‘ucomieatl 


I 
oouseatmreneertes 
TITLE ¥ 
¥ . LE 4 
SHEE EL KEKE EELS 


RERRAL ELE ERE 
*TST1(O2) * 





LOe 





CARO READER C DECFLO VER 00.12 O1-JUL-77 O8:4S PAGE 
Test ‘F INIT. REGISTERS ss Si@ 0024 
FLELALLELEEE 
eTSTi(Gi) # 
seks Gudea 
JE OE t 
RELERERERERE = (EH #% 
#CKOFFL (4S) #-—> ## CKOFFL HR 
RELEEEEEEEEE | BH #% 
: HEH 
I 





le cor - ee 
B, Pe wesc ae / STA REGISTER? * 
seamen cucncoe See 
ESE 
SEREREEREREREREREREE 0000 weer ee reso o----- 
Pa cRnon” 4 = es - a aaa ‘\ 
/ / / REP ARED? \ 
emamtbeeacy aucuetid memes e soniimcnianaies 
wenn nnn nn nnn >] 
Fees = ey NO 
/ rte, /eehishth SERED 
/ By ao wenn nnn nnn eee === == 
petit it ttttititisiie) YES 
KELKHEREREKE 


*TS$T2(03) # 








M02 


$01 4/5068 CARD READER DIAGNOSTIC DECFLO VER 00.12 O1-JUL-77 08:45 PAGE 03 
5 /WRITE STATUS REGISTER SEG 0025 


SREREEELEERE 
“TST2(02) * 
a 
IN 
EX- & 
FOR BITS 0 8 8 # 
4 


= 


LHLEFAALRSEELERLRERE a 
/ / 7” Now SET? 


I 
YRPREAR SOLEUS 
#TST3(04) # 
LERRERRLEREE 





vrrtttt tiie) an--------------- 








/ 4 NO / ALL BITS \ 

/ foween--)/ \ 
A ME ee A BE 
cermin sates ~-<---- — aavsicians 

ceceeceersonocecoes aaosocoe) 
sasnanavessbsspassyetste 
Sante eee 
SERLEKELRER ELLE REAE REESE 
a ws me ae eo ee 
/ 

/ ERROR’ foonnnn-)/ cLEGR aN ars \ 
/ / / REG. FOR 7? \ 
emma: wen oe 

i > 
caunaheasies 


*TST3(04) # 


NOe 
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TEST READ/WRITE OF COLUMN COUNT REGISTER 
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: LOAD 11s OF 
x a 
+ THE COLL % 
* REGISTER ¥ 
EELELEEEERERERL SEER ERLE 





SEEKEREREREREFERE LEE Pt ee 
/ ’ ERROR fanteony/ rhe status IN \ 


/ / 
wenamniicene: sien 





Lnonccenrncheconssiiiin iii 


pgs 


ca IME grat 


HELE 


Ht 2S Oe 0D ie ae SS Ee SO EY OD ot OO Pe ae 


(ERROR 
{HHH AHHH HEE S 
EEE 6 


SLHRELRELEE 


Land Oe ihe Cou, \ . % 


OP OOS EE OES OSS WVSS SZ ewan] 


peor 
/ / Se S BI 
if con f ----- F Ih Tee Status US . 


eee ocmAR chat 


eG A ee CE oe HEHE 
#TST4(05) # 


SEQ 0026 


B03 
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TE US TOoRe Ss REGISTER SEQ 0027 
EEEREREREEEE 
xTST4(04) # 
oe 
. L 
eB cs : 
Bete ore 
eet t ttt ist tttitis! as poe Say 
/ / 
/ ERROR /-------)/ OF THE BUS \ 
/ / / REGISTER=1777777 \ 
Peete ttt ttt ttt ttt! cuiinalidticlanniinatepeantiainiaainauneniee 
I t YES 
EELEEREREREERREEERER 000000 coon oreo --- 
/ REPORT / WO / IS BIT 7 SET 
/ ERROR /------- >/ IN THE STATUS 
/ / / REGISTER? 
LEEELEEKAEKKAELERES ciukostseipaishitenibndsaigalimieneimennatenddntitie’ 
I I YES 


a 
I 
HEKEELGE LEELA EERE LEE cassia tian tininaaetaaio 
/ REPORT 4 NO / of re THE CONTENTS “ 
/ ERROR {on-----)/ OF THe BUS 
/ / / REGISTER NOW 0? ‘: 
eee e ST ee Set tS St tee 
I J YES 
HELLER A LALLA AALEL EEE cociiansngimasainpanaieiisaapiinasas 
By T NO se IS ee STILL \ 
/ / / STATUS REGISTER? \ 
RERKRERREREEEREREEER 00000000 errr nner nnn == 
I : YES 
LERLHELILEEY 


*TSTS(06) *% 
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/ TI 
CO COS eR REROY 10 CLEAR BIT Seo 0028 
peste tttttt te 
#TSTS(O5) # 
LEREELELELES 
AREAL LE EEE LE EREEL LES 
SEEEREREREES xx a SELL ERRERELE 
*#TSTSA(OB) # RE CKOFFL #% ---> CKOFFL(4S)% 
EHEEEEREREEE +S 3 LEERERLEREEE 
I XERKLLERERELEE EA RELA RELES 
wo en wn nn nn nnn KHLHLEKEA EHLERS ERL ES I KEEFE RLELLAES 
/ IS CONTROLLER \NO / REPORT / I #TSTSB(O6) * 
/ READY CLEARED? \--->/ ERROR / LEHHUEHEEEERERHEEEREEE REEEHSELEALE 
/ 2 /  * SET UP COLUMN COUNT # I 
wenn ne nn ren nnn naan — KER RHEREEERREREREE : i.) TB) BR o.  tearemenpenquneerreina ERLLALLLLELALLE EEL EE 
I YES I % 1 x / JS ERROR BIT \YES / T / 
oan nee ) | (eon nnn = KEELE H HELE HALLE E KKK EH / (BITS) SET \o--=)/ / 
Ts eee enieneneneasenenasiner Peeerettt tt ttre t ttt I / STATUS REGISTER? \ / / 
: / i yin ne / T / Te eee eae enema enema ae eens EEEEKE ARRAS EL ELE EES 
/ N -9/ /  ERERERERRERE RELEASE REELED I NO 
: / REGISTER /  * SET UP MEMORY . * I SELEREEEEES 
wewewnmnnenenennennn==- eHHHEHHEEHHHHEHHE * FOR COLUMN S * I *TST6(07) *# 
I I NO x & I LELLERERELES 
: I SELL EREE KELLER ELL ERASER LEEK KEES I 
eet ett tests este itis r ee: *TST6(07) # I I 
#I THE - & ELLE KREKKHEK COUNT I 
# TO WAIT FOR *# ERGEHLEHSLERK LEAKE REES y 
% #INITIALIZE A COUNTER ® 099 we3rree seers" 
I Testi tt ttt t ttt ttt tiie: $ TO WAIT FOR & ANY OTHER \YES pester ett titi ttitese! 
I I 5 READY # / ANTS SET IN \eoo-- > REPORT / 
i I peacesitcieshr nausea / STATUS REGISTER? \ / ERROR / 
woo - eee === ----- wenn nn nnn nnn nnn nn --- / / 
NO / HAS T cee TER \ I I NO KEERRERE GEL E EEE EE 
-----/ EXRLLHERELRSELERE ] ( ------------------------] 
/ ? \ % START READING * HERELEKER EES 
cemenenwennewnoweon=-=-— ¥ AC $ *TST6&(07) #* 
I YES % Peeters i iiic! 
I peeetrete tis tt tet 
HEE REREEE ERK EARLE EE EEE 
¥ pte # EX REREESLELE 
#STATUS TO WHAT IT WAS* #TSTSA(OE) # 
* BEFORE READING CARD * eestor iret tt 
eines. ecaceeaceees 
oo enn n nn ------- KERERLESK EEA E EERE 
/ IS CONTROLLER \NO REPORT / 
READY SET? \----) ERROR 
/ / 
aon nnn nn nnn - = -- = --- KEEKERERERESELHELES 
! YES I 
eeneeieerens 


#TSTSB(06) # 
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TEST BIT 2 TO BE CLEAR AFTER CARD READ SEQ 0029 
EEEKERELEREE 
xTST6(08) #* 
RE REEL REL ERE 
KEXERARERE EE GERELEEEEREREE 
SHBSESHESENE | : XE HEE RELEEEES 
#TSTBA(O7) # ¥X CKOFFL %%---—) ECKOFFL( 4S) # 
a. ¥% Ex ones ceo 
KEXKLLEEERLRERRELRREEAESE 
I FiISTEB(O?) "; 
USI ca RESLELEG EGGS RERKE SRE EE REEKEEERELES 
FOR % CLEAR THE STATUS #* I 
* REGISTER Ko HARE ARARA AEE E HELE 
ceveseenneneencaneaneys % % # RESTORE PROCESSOR #* 
SELREREEREREEERSEREREEE «6% «©6STATUS TO WHAT IT # 
naneentinesalediiimuomna I “WAS BEF READ *# 
¥ - & KERKLEGSGEREGREREREREEE «RRR RELA RRRR REE ER SE 
* & % SET UP COLUMN COUNT * I 
* BIT (8 % REGISTER TO READ *& i ceeseeec--------- KELEREKAEEAERAR EL LELE 
eee tt ett ttt ttt ttt tite z 20 COLUMNS x / IS CONTROLLER \NO / REPORT / 
anne nnn nnn nnnn--) Se Ps READY? nerntee ERROR 
RAIN SAE / 
: / Is CONTROLLER \YES HHLEKKE BREESE LEXRELEREREREREEEERERER 22-9 - nnn RRR ERREREREERERERE 
/ ADY? \-----) #TST6B(07) * * SET UP MEMORY .# I YES I 
/ \ KEELE ERKL ELH % FOR CONT % | (--------------- ---------- 
EE te PEN EE Bae % x eomew mwa nnn eo KELHERERAAREE EES HELE 
I NO KHKGHE KEELES RARER KLE KE IS ERROR BIT \YES / REPORT / 
RE EKG EERE EAA E ERE EE RES I f (BITiS) SET IN) \----)>7 ERROR / 
Me x I / STATUS REGISTER? \ / / 
TO WAIT oN % EREREREREREMERERE 000 meee enn n nner n= KHRAERLE RARE LEEEEE 
Y & % START READING * I NO I 
i rete ttt itit it ttt tt ites! x A CARD # | (-------- ----------------- 
I x % KRAEREERELEE 
ntitadiliiainnimiaadaiaipiaanits EXKKHALLKR LEK LEEKS *TST7(08) # 
NO ~/ OVERFLOWED I HREXERE ELE HE 
eocowe I 
ween enn - HLL ERK KRHK RARE LE KL ERE 
meme mw een none ne esennn= ae | wee (as ga \YES 7 PORT / 
I YES / \----) ERROR / 
Petes tit itt it tits ite: / © / 
/ fo Jo a ee es KHRKKLHE KHL SREKELE 
P Pg Bac I 
ett titititiittttie LELKLLHHEKKE 
¥TST6A(O7) * 
eet it ttt sity EX ELEERELELH 


“TST7(68) x 


CD11/CD20 CARD aaron NIAGNOSTIC 
TEST INTERRUPT F CONTROLLER READ 


EEEEEREREEEE 
#TINT7(08) # 
SV 
cnasenesnsnscnase HEEEE ELE EHELERKRELEE 
/ a \NO / REPORT / 
/ ? \--)/ ERROR / 
/ ra / 
autinananmainniiimninen HEEL EEELE REL EERE EEE 
j= : 
MEREE ERE ERERE REE 
4 T STACK # 
% PO FROM # 
ee 
coacescocooscoce= EREKKEGEK REGS EEK KKES 
/ ID ANY KIND \YES / REPORT / 
/ SHOW \-->/ ERROR / 
/ ? YS / 
sucuninuiaindinniminamne LEKLEREKREEHE REESE EE 
Pes I 
SEL EE LEE EMER EERE 
% 
: INTERRUPTS | 
4 & 
pee tii siti tt iiss: 
: HEKREHAKHEEE 
poset t iti tit titsii tii tie! eee tt ett tt 
é 


¥ aid TRAPCA 
HVECT T 230 : 
J A EEE EE ES a a 


CEEEHSEER EEE 
*TST10(09) # 
ptrett itt ttf 


E03 
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SEQ 0030 
SHEL EHH EEE 
*TST7(07) # 
EREXLAE ESLER 
KRELKEE LEGG RELL EE REEL ELE 
¥E #% LE ERLLEEE ERE 
aY INIT eos x 
¥E EX EREEEEERLERE 
KEEKKERELLEEE ELL LERREREEE 
RETURN POINT. 
x 
. ie FOR WEN 4 EEKRLLHRELES 
#INTN(OB) # 
ssrenneseeneeneaeeas HFFELH ERE ERE 
EEK EKEK ALE RHEE ERE KELKKL EK AE GLEE E LEE EEE 
* SET CPU TO # xCIVE CONTROL BACK TO # 
% PRIORITY 4 % CPU AND Ce + 
¥ LEVEL 0 % ¥ £ 
pccaehiae waccieuete ae. + Sn, 
et bye ges mg ELEKKEELE SESE KEEELES 
* SET COLUMN COUNT TO *# / REPORT / 
¥33(10) } ro ADDR. # / ERROR / 
TO * G” x / / 
ene ne nena EEKEKE ERLE REL ELELES 
SERLEALERERKEERLE EKAELKEEHHRE 
% SET INTERRUPT * 7 + 
: AND : HXXLHELEAEES 
eS 
Perrrttrtet ttt t S| 
% WAIT FOR x 
x C % 
% % 
re 
/ DIDAN INTER- \NO RLXEL ERE ELE 
/ RUPT OCCUR? 9 \W---%---- »*#INTN(OB) # 
/ ERXKLHELEREK 


I YES 
KELEKL ERENT 
*TINT7(08) # 


meee TELL LLL LLL 


CO11/CG20 CARD READER DIAGNOSTIC 
TEST NO INTERRUPT ON CON READY & CPU AT LEVEL 7 


2 AEE A aE EAE i kat 
#TINT10(09)# 
Se SEE AE Se aE EE 
i Ae Se A A ee AE i a A A ae EE 
/ / 
/ / 
/ / 
$e He Se A i SE Ab bd aE HE a Eat 
—— a 
* she # 
: PO % 
% 
staiataia,  veenatnnts 


 delehebehed- toh debe teb tii 
i INTERRUPT 
* I Ss 66 
+ * 
JHE EE di dt 
J EE EEE ES EE 6 J J a 
* ReaeT x 
BVEL M 230 , 
Je EEE EE EE i a de 
 dehekebed bobbled 


#TSTI1(10) # 
SEER EEE EE 


FO3 


SRRHLEK KEKE 
#TSTI0(08) # 
HEEREREREKEE 
KEEHEREREGLE EERE EARL EE EEF 
£% Hx 
RE INIT %%-- 
Xx ¥% 
KHELKHKGE EGE E EERE ER EERE EE 
: ET RETURN POINT 
x 
tae FOr WEN a 
AR 
EME EN ELELERE BALE 
* SET CPU TO # 
aPRIONE TY LEVEL : 
KHNL RELE REERE REE 
ELEKLERERELEL SLE K AREER 


ws 
# 
KELLRERRLELE 


REERKERLK KERR REX 
% SET INTERRUPT * 
¥ AND # 
x . * 
SEELLEERLERERLELE 


KEELERES PRES LAKES 
%* WAIT FOR x 
ONTROLLER # 


¥ * 
KLLKALKLAELELLLAE 


ZHEXHEKEEELE 
*TINT10(09)# 
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SE@ 0031 


RHELERERLALEE 


->#INIT(4S) #% 


KELALELKELLLE 


a x 
% 
ELLER REREX 


| 





GOS 
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TS FOR INTERRUPTS SEQ 0032 
LHHELESEREEE petstetttite: 
*TSTLI1(09) # OK(10) # 
SHEER EEE pect t ttt ties RELEEHEEE LER 
#TINTL1(10)% I 
EEELERRERERE LELLK KALE RE LE REALE ARSLE RE reeset ttt ttt tiie? 
I , ee xe RERERREERERESE & GIVE FULL * 
oan n-ne ------- KEELE RE LEHRER L RA ELL KEES INIT #%--->) *INIT(4YS) #* # CONTROL BACK * 
F,. IS CONTROLLER \NO / T / **% Re LHELEHEREERE ¥ TO CPU ¥ 
READY SET ? \=--)/ J RREKRKKRRERELERRRRRERE REESE posttest ttt titties 
\ / / 
wae nnn nm mewn enn nen em——  EEREEREEEERE REELED KKLKERLLELEELEKKE EERE EE ERLEERERERRERE ELE 
: YES I % SET RETURN POINT # x DI # 
( ewe n nn nn nn nnn enn * AND PS FOR WHEN AN #* * INTERRUPTS # 
HEEEGGERERERERERE % INT OCCURS x x 
+ DISABLE % HEAL H RLS EE RE REESE eect tt ttt ttt tits! 
* INTERRUPTS #* 
+ x HERLEKEEALNREELEE eet tte ttt tet ttt eters! 
pees ttt ttt ttt tie % SET CPL TO # * RE T + 
* PRIORITY x *VECTOR LOCATIONS 230 * 
pret tit titi tet ett ttt 4 LEVEL 6 ca 4 ¥ 
¢ 3 CHER # Peete ttre tits i is) KEELE HEKE KEL SER ALLEL EES 
* CTORS 230 8 232 * I 
§ x KHKLKERGHHA EKER EERE LHEE wanna -- === LEERESEAEAERREL ES 
SEERA SRSA EEE EEE ERE | COUNT TO *# / HAVE INTER-? \NO * GO ON TO NEXT . 
(10) BUS ADDR. * / RUPTED ORE AT \-># TES 
Peet iti itt isi isi ty EELKKELAKELL HELLS * TO ™ & /  #NOTHER LEVEL? \ % : 
+ oer STACK ¥* %* GO TO NEXT REEREEREEERRRRERRRRERER tne ne ner renna= poet tt tte tisiiiey 
* PO ER FROM # £ ro I YES 
& 7, % RRRRRRRERREREERERE 0 Reem e enn MELEESEREEEEEE . 
pe eis ttt ttt tities? SKKELEH EEL SLER EEE % SET INTERRUPT # / WAS THE OTHER \vESa *REPORT INTER- # 
I I NO ¥ / LEVEL HIGHER? \-)># T OCCURED # 
mew wemeemnmnmnnnn—s eee nee neseeeenn= ¥ : x / \ #AT HIGHER LVL. # 
/ INTER- \YES / WAS THE OTHER \ MEMERRERERREREEER 0 mm emer reser nn= pettet te ttt tt ttt 
/ RUP FORE AT \--->/ LEVEL LOWER? \ I NO I 
/ NO LEVEL? i- # \ eneseumeneeunenee 6 2 20=—___i(ddsCi(C# Ih eptwroewwowwocesceace 
we ewww www wwe weww nen es 2 een e nnn en nn nnn n= * WAIT F % EKEEGEEEERELEE EES 
I NO I YES % CONTROLLER # % GO ON TO NEXT *# 
yg eg age REEL LEAL ERAKEAKES % x 
7 FUR / REPORT ld / LELLLHEE KA RELKALE 5 % 
te 8 ;: OCCURRED AT LOWER / I Peet tt ttt ttt tet 
* / L / oo 2 ee === + -- == - 
souceeteseerdeeedneaius He HEHE HE HE HEHE HE He HH MEE HE HE HE HE / DIO AN INTER- \YES LEELKRLKRL ES 
I / RPI CAn °- >*¥TINT11(10)# 
pee erie iii ttt ttre tier ie: PPeet tes ttt t tise: / \ KLEKGLEKLE HEE 
#TYPE i. : CATING # * a | Sher nee nrsemineernmre 
* WHAT x TEST I NO 
* % BR a te a a a ee RERERLRRREESERERE Boon nn nn nnn nnn # 
PT ttitiittittittiiiiis: RELELLEEREEELELES / IS CONTROLLER \NO- # N *NOTE: Tat te AND TST13 
/ READY SET? \---) # L % ARE STRUCT SIMILARY 
REA EREREREL ELSE ES / \ & WAITING * AND WILL TEST CPU LEVELS 
®# GOTONMXT 8©® ©  eemememerooonoroeoonoen LHLERL SRE REERE REESE e AND 4, RESPECTIVELY 
J TEST * i - i c eae + 
SLHELHHERELE 
SHHRLRERERELEERERS ¥PR70K(10) # 


HO3 
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"TEST 14 THRU 17 ARE STRUC {URED SIMILARLY 
KELRELLEE 

TO THAT SHOWN FOR TEST 11 sTSTi(10) i: 
FELERRLELER 

teats iY ey 17 COVER CPU LEVELS Sac 2,1 AND 0; 


"AN INTERRUPT. T0 OCCUR Since he CPU 


LEVELS ARE BELOW THE DEVICE LEVEL OF 


Yow ww ww nnn nnn nn nnn nn nn nnn % 
pet iiitiiity HEEKRLZKLEREE 
#TST20A(11)% % & 
— Peretti ti si tf! 
wan ee wn nnn nnn =~ eset ttt tt ttt ttt! KELEELRELEELE REL KE RRA LEEE 
Ps pre AN INTERRUPT\YES # REPORT ERROR * oy xe EXEEEEEREEEE 
NALLY OCCUR? ‘ -->* NO INTERRUPT #* #E INIT ¥H----) RINIT(YS) # 
% SHOULD OCCUR # xe £% KEKE ELHKEELE 
wonennnnnnnann o-------- Pere ttt ttt ttt ite ft: scart 
eet ttt tt ett ttt! 3 ME He AE HE HE SE HE HE SE HE HE HE HEE HE KELKEKAL EERE LAER EREE EEE 
# # ¥ Ree Sn % #SET Re TEN ena AND # 
$ K TO x PO FROM * * PS FOR AN e 
é ® x T # * INTERRUPT OC % 
He HE HEHEHE HEHEHE HE HEE HEE EEE ——— stabiccnc: egulanuaaaata 
peti it ttt ttt s tite! poet tree eee s ets SY 
iy % SET CPU # 
: I 5 : EPRIORE TY LEVEL . 
revit ittttstttit KLKRKKRRAALERELKEE 
petit itietitttiti tiie ey! KELLEG EEE RE EERE EAEERE EE 
eS +351 TCHER * % SET COLUMN TO # 
: LOCAT . . A107 AND ADDR. - 
pecetiiitcttisttttiii fs: KLLKLKLLELESEEEEKAEEEER 
RE RRHES RHEE LEY HERE LEKEE SELES 
“TST2l(le) * x ¥ 
ttt t tiie fe % INTERRUPTS # 
# & 
KELKEEL ERE LEKEREE 
eee ee eet ttt tt titties ey 
* WAIT % eee tt tettt fe: 


% 


* SEE IF AN INTERRUPT #--- 
OCCURS % 


>*TST2OA(11)# 
HH ELELERLEEE 


SEQ 0033 


I03 


1/CD¢O CARD READER DIAGNOSTIC 
SIMILTANEOUS INTERRUPTS AT MORE THAN ONE LEVEL 


JUSS HEKKKLELELEE 
#TINTel(le)# eTSTel(11) & 
a JHE 
ween neon nn ------ J EERE SESE SEE SESE SEE EEE AEC HE HEE HE 
/ DID corNt \YES # enti STACK # ## He 
/ A 2ND RRUPT \--)# eg 2 & #t INIT 
/ ? ‘ 2 oe % kt £% 
oreo nn enn enna =< -nnnnn= J SEE JESSE SESE SESE SE EAE EAE EAE EE AEE AE HE HE AEE EE 


KERLLALHLLEE 


R¥---->) RINIT(4YS) & 


LHHHRELARKEE X 


oe 8. Sa es a 
* GIVE CONTROL # / / * SET RETURN POINT # 
~ TO CPU : 4 ERROR - : FOR WHEN AN . 
4 4EES SHEED EERES Sueeanenneggeenense Pere titi ttt tt iste: 
neneseassenpesace sonecpeemangaseee 
2 INTERRUPTS + SE RIORITY 4 
4 ¥ ¥ LEVEL % 
ERKLE ERLE EER EES EELKHERRLEAAELHEE 
supeapanpteesonnenssese ego oe ae 
& ¥ COLUMN COUN % 
SVEETOR T Coen + * 1(10) Re ADDR. # 
* % % 70°" G” # 
PEST ett i iti ttt tii isis LEKELE RELL R EARL RAKES EES 
ttt t i ett tt HEKGKAA ER RRERL EEE 
#TST22(13) # % SET INTERRUPT *# 
EHKHREHELELE % E AND # 
& ¢ 
slain einiats 
wan n enn e en -- === - ERLRLEE KEKE LEKEEE 
/ DID AN INTER- \NO ¥* HANG IN LOOP # 
Pd RUPT OCCUR ee WAITING : 
onan nn nn nn nn nnn nnn === LEKARRLHRKEEHHREEE 
I YES 
SEXKEKEL EE KEREREE 
% RESET STACK # 
% POINTER FROM 
* INTERRUPT #* 
HRELEE EKER EE EREL 
peettt ttt et ett ise! Petre ittt ttt t tits 
* SET es ¥ 


ADDR. FOR NEX 
“POSSIBLE INTER. * 


% LEVEL 0 # 
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RELELALALEEE 


* SET CPU BACK 
»* TO PRIORITY %*--->#TINTel(12)# 


RELEAHEAEESE 


SEQ 0034 





JO3 
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eTEC ION 


NON-EXISTANT MEMORY SEQ 0035 
er tit tiie Peete t ttt tte | Pettitt tttt 
#TINT22(13)# #TST22e(l2) * *#T22A(13) # 
RE SEEE SEES EEHKEEEREEEX ses aac 
Tet iti tiiitttt ities LERRRREREMERERRREREREREER 00000000 tenner een nn== PoeCS CTC CC CT CT TS TY 
x T Hal he # Ke HH 44RREREEEREE = / ANY OTHER ERROR \YES# REPORT + 
#VE LOCATIONS £ BE INIT #¥->H#INIT(4S) #& 7 ats SET ? ES. \-)# ERROR * 
x é ¥# HH oeeREEEREEEEE/ «BITS 2,10,11,ETC. \ # 1 
ceceemameen: sols eeenn LEG EEEEHEA LE RERLLEL ERE EE waneenees -------- Perit ett titiiiiit 
I 
we ew nnnnnnenee--- LEEELRERELELEREEEEEE LEER RRERARREERAEL ES | (-------------------- 
/ Is COM eLeR \NO / REPORT J ST GET POINT OD 60 RESTO er erscces= rete ttt ttt tistt ey 
/ ADY ’ \o--=)/ ERRO! / * PS FOR WHEN AN % / DOES BUS ADDR. \NO # pal * 
/ ‘<“¥ / % INTERRUPT OCCURS # / REGISTER CONTENTS \-># t 
we enw nnn nn nnn nnn n-ne = Pett tT ttt tat ttt ttt! Peete tr et ttt ttt tit? ee / =160002 ? \ # * 
I YES I RRR ert ane eee tees ttt tities! 
| ( -- 22-2 oo --- = + = EEREEHE ERLE ELERRE I YES I 
ween wenn nnn == EE EEEREERERELE REALE % SET CPU TO # | (-------------------- 
/ IS ERROR BITIS \NO / REPORT / eg Be SER oma eng HERRERA ELLE EE EES 
/ SET? \on--)/ ERROR / x 0 ¥ / DOES COLUMN CNT \NO # REPORT 
/ ae / HKEKLERELEL EEE EES / REGISTER SHOW 4 \-># ERROR g 
wewweeenewnoweneeenenn= mwTrrttti ttt t ttt it I / COLUMNS LEFT? \ # t 
} es I Se aoe ee menace x ------- acme, wie 
caeeeeeece eee ee eee eee eeee £ 
wee enn nnn nnn ee Peete ett tt tt titties! & chun 1 READ # ] ( -------------------- 
/ IS NXM BITOS \ / REPORT 4 * S(10) COLUMNS * LLLAELAE HELE 
SET? \on--)/ ERROR / mPterttr ttt titi #TST23(14) * 
/ TE . / I EEEEEEEE SEES 
oa nnn ee en nnn nee n= Peete ttt ttt ttt tite! HEHEHE LES ELE EERE EEE 
I YES I * SET ADDRESS TO # 
] ( -2----------------------= ¥ STANT MEMORY *# 
woe e nee n ne een---- SX RRSREEREEREERERERE & =«©OLE. LOC. 160000 * 
/ eh EXTENDED \NO / REPORT /  EREXREREREREERARAE ESSERE 
/ IT 17) \er--)/ ERROR / I 
/ SET? ae / Peete tt titties i is) 
ee Pettit ttt ett ttt tte s T # 
: YES I & 
( ee aennenn-n------------== . MEM. BITS * 
"on wee teen - fe re en 
/ nenone Peat \eo<-)/ ERROR J eee enon ne= KHEKHRKEREALEKEEE 
/ SET? \ /£ / / DID AN \NO  * HANG £ 
we enn nen nn nn e---- HRHERELK LL EREKEKE SE / INTERRUPT OCCUR? \---># WAITING x 
I YES I / =. # 
I (ewewwnennwnemnnneeeeeeen— een ennennensen= Pettitt tt ttt tte: 
SHERRBREE EHH I YES 
#T22A(13) # Peers ttt ttt ttise! 
Pritt iiiiiii % RESTORE STACK # 
% POINTER FROM # 
* INTERRUPT # 
meitiettis tara 
KHRKRRLL ERE SE 


*TINT22(13)% 


1/CD20 CARD 






DIAGNOSTIC 


KO3 
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Col READER 
BYTE & DATIP LOAD OF COLUMN COUNT REGISTER SEQ 0036 
$e He He HH he eh ae a KLKELEHEHEKE ELHEEEREREEE 
eTSTe3(13) s #TST24(14) *# #TST2S5(14) # 
# 5 EERELLEEE LES — 
$6 EE EE LEEKEREKELKKREAES EREFEEEEAELELE AEE 
. INITIALIZE - . INITIALIZE - : INITIALIZE : 
: 00# £ Spare 00 x Rpetet 00% 
SRERERERECEDE DERE HE EERLAH KEK LEE LE “ HEREK 
ei 3 ee ab ab A bE a a a a a Peete tet tt tt ete tte Sy eee pyre eee 
*L BY # - LOAD nie ree % LOAD 
‘ . &# G. # sREGISTER UIT {Um iogon0 
* Wd THE * : ‘a THE VALUE 2Se * 
einen, enum ext: enmuenane Fecerneneenrennen —.. 
oo nen enn nn nee - Peer et ttt ttt tet ss 222 ---- = ------- pee et sett tii tiie) anne - === peter ttt t ttt itis: 
BYTE \NO # REPORT x as DID L BYTE \ # REPORT * / DID CONTENTS OF \YES *# ry 
ot \--)# ERROR * GET L WITH ee ERROR %* / COLUMN COUNT REG. \--)># ERROR ¥ 
/ "1 t x / “THE VALUE ALSO? % / CHANGE ? \ # + 
oo ee eee ene nnn n en nn--- BREEERHREERERRERE ooo ooo mem nnn nnn » peaeeeeeenannees wan nnn nnn nnn nna RREKEREERREEEEEEE 
= YES I [leew nnn nnn e nn -- = I I NO I 
( eww e wenn --------- === SEEKERS ELE | (-------------- ------- 
CHER ERERE ERE *TST25(14) # EREKERFLALLE 
#TST24(14) # LEXLEXKKEFER *TST26 z 
trite eii iit: KEELE LEKHEK 
=—- S 26. 27 AND 30 ARE CARBON COPIES OF TESTS 23, 


CE Sag ye 


OPERATE ON COLUMN COUNT 


ef . 30 OPERATE ON BUS ADDRESS REGISTER. 


LOS 
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WORD COUNT “OVERF LOM FEOu TO. NO CARD. 












ELLLRHHAELSH 
| SEEGER ERERES #TST31 % 
#TINT31(15)% LEEEREREEREX 
| reer Trr rst 
EREELEEEELEARELHE REELS ESE 
oo ween nn nnn ee eee ett t ttt ttts tt eie ey RE ELERELHHERES 
/ 1S corer \NO / REPORT / *% INIT #¥----) #INITC4S) # 
/ SET 7 \---)/ ERROR 4 €% FE HERERKELELAE 
/ \ ¥ / —s HERA REAR SE REEES 
wee nnn none n nen enn---=- HEGEL EREEESEHEE EEE SELLA LELEAE 
i YES I *T23G0 x 
( wwwewnnennnnnnn- one === == - SET UP £ HHELLERHEEES 
Pettitt tiiiiiiiie . os 4 
t I x . FOR I T* eee tt tite ttt tits! 
* 3 * GIVE CONTROL #* 
* IN Ss % BACK TO x 
pret iti tii ttt tte # CPU * 
I # SET ¥ Peete i itttt titties! 
Pec titititittiitiiiiiig x 70 he % 
# BEST TCHR % “e ¥ LLKREKEHRRRLEL EERE 
- ; : espostisnne LAugeRR y INTERRUPTS 
Titi itiiiiiititiiiiicsy EEKERLAL LAKE LASHER KEEKK ¥ * 
% SET COLUMN TO # LELKKERLALHE RE LES 
reset it ii ii ttie ie % §81(10) I.E.-WRAP 
% RESET STACK # % T x EEKEREE AGREE EEE REEEEE 
t ¥ ERRKHEH % RESTORE TRAPCATCHER * 
x I % XVECTOR LOCATIONS 230 * 
Petit tt itiiiter?: LLLLERER KEARSE LLE RSE REESE & + 
I % SET A START ay 4 peeti ttt t ttt ttt s ssi iis! 
wee newer e nner ---- SLERSERERERELELERERE & FOR TENTS % 
/ Cann Reto \NO / REPORT 4 *& $ EHEKE KLARA ALLELE EERE 
/ ? \=-=)/ ERROR KHLA LESH ERE ESE EERE ES / T / 
/ / / I / ERROR / 
ween en enn ene een enn--- pester ttt itt ttt tits) / / 
I x T # RRLKREL ERE LARLEAEES 
------------------------ ¥ AND 
ansunknunens Petter ttt ite 
#TST32(16) # EELLLLSRELEL REALE ¥18732( 16) a 
SEREERRRHERE 1 EHHKEKLEEHES 
/ a WE GET AN \¥ES LHLRHLKHRLEAE 
77 | {peor >#T31G0 % 
Pertre titi? | 
I NO 
REELS ERLEKEE 


*#TINT31(15)# 


SE@ 0037 


M03 
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BUS AODRESS ODD & TRANSFER IN NON-PACK MODE SEQ 0038 


EERRAERREEEE 
#TST32(15) # 
SESEMRAERELE 








ttt i titiiie 
#ENDCK( 16) # 
pTetiiitiiie! 
/ \YES REEEEREKLEEE B----) #INIT(4S) # 
4 IS SNKO7 > SET? \-------- »HDATST(17) # ae HELKERLERENS 
/ \ ERELLEELE GEE 
I 
patti iti ttt tii % 
+ DING 
¥ a & 
# LING? 4 e 
retisitittiiiite 
I *% 
$% s 
4 % 
$e 6 3b Hb ee HE ab ae ae a & 
I 
SKREELEE SES RREELELE RE 
/ pent AN \NO / T / 
/ I \=--)/ 
/ INS TRAP? N\ / 
: SLRERHEREERHHELELELE 
$ 
RHERRLLHELES x T TRAP- * 
#ENDCK( 16) #<------ ¥ FOR #* 


T 
HERERLEELELE * LOCS. 10 8 l2 # 


NO3 
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DATA RELIABILITY TESTING SEQ 0039 


13 EE HEHE 
#DATST(16) # UNPACKED MODE EXAMPLE 
JHE HEE 


I 
te 


LELLELKFRFLLLREKTE 
/ 4 
4 / 


Je EE ESE SEE SE i a bt 
I 











ae 








ciadiaian Peeeririr ie tt itis titties y 
/ ARE sas tictiataa \YES a % ye a ‘ 
/ BINARY DECK ? \ ¥ OPeLE NOINTERS : 
ween -<------- Serre rete ttre ttt tet ety 
I NO ae : 
petri sr iti tititt tit oy 
* L % 
: “Danae 
# POI # I 
ra sinspeicotyiaais. | Pobcnnenes I 
REL GELEEEE EERE EEE RE EEE 
be eo EERELEERRLEX 
Ee INIT #H----) BINIT(4YS) # 
KE 4% ELREERLREREE 
SAUDER RERORRENNOETER ITS 





EEEEREREERES 
#DATST1(18)# 





BO4 
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ERELELEREREE 
#DATST1(17)# 
LERELELELELE 


EEEKEELL KEKE S REREREL SEEK 
¥ x 
¥ I S 

& 
ee 


/ \NO 
/ DO WE WANT PACK \----I 

/ MODE ? \ i 

I YES I 

% SET % NO / WAS IMAGE MODE \ I 
¥ ANCE OF #<-----/ SELECTED ALSO? \ I 
% MODE # / \ I 
AH KER AE RER ELH EE ik umcepeciaeglintestasibisdaDicae hisceiaibaantiltini 
I I YES I 


eee eee eee wee wT ew Pewee” om) q wo ee ee a ae ee 


pencrenernnney 
% READ 


® CARD % 
RRRRERRELERE =—|—- ERNE 


nanan nnn nnn) [( mannan nana === 


HLELLHLKHKKE wenn ewe nen nee ---= I 
/ HAVE LE \NO. Oo 
/ FINISHED READING \----I 
/ A CARD YET ? \ 
I YES 
aan nn nn nee KHEKKERELLE SR EAEL KEES 
/ \NO / T / 
/ IS CONTROLLER \---)/ ERROR / 
/ READY ? ee / 
wana nn nnn ne ene == KERKELELE REE REEKEEE 
I YES I 
| (----------- ------------- 
EREXHLEEREKENO / HAD WE SELECTED \YES pect test iis! 
*ISR(19)  %<----7 DATA PACK MODE? \------ »*PSR x 


ERALALLLEREE / \ HLL HLRALAEEE 








CO4 
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DATA See ABILITY TESTING SEQ 0041 
EXLEREERLREE 
#ISR(18) # 
HEXEKERERERE 
/ NY ERROR YES peste stei es 2: 
/ BITS SET? \- ~=--) #ISRER(22) # 
/ \ HERRERA EKREEH 
I NO 
----------------- eee s itt ttt ttt etti ees 
/ IS COLUMN COUNT \NO / REPORT / 
f OK? I.E.ZERO \----- af ERROR / 
\ / 
a---------------------- peer ttt ttt titties! 
= I 
~---------------- Peete tit ttt ttt tiie! 
/ IS BUFFER(CDA) \NO / REPORT / 
My CONTENTS OK? \----- >/ ERROR / 
\ / / 
~~- ~~~ --- = -- - = - ---- LAX KEKAARE RE RHEE LELES 
1 I 
HEGHEHHHEHHEHEHE os re 
* SET UP A ¥ 
> COLUMN £ 
# COUNTER # 
eugannunenie pitiinnecl elaine 
EELKKK KEEL EF EREREREEKE ELE REL E 
* BEGIN = & 
* DATA FOR ¥% 
* CORRECTNESS 
— 
/ PNY PIECE \YES RELHERERERES 
/ OF DATA WRONG? \------ »*#ISRDE(21) * 
/ \ ERLLELEE RENE 
HEREEREEERER 9 ooo oon nono nn nnn n= 
I ¥n------------ >I NO 
RREREREREREE 000 ooo oe een Peter tt tt ttt is es: 
/- HAVE ME \YES * RESET POINTER *# 
4 CHECKED THE \----- >* TO BEGINNING 
/ DATA? (T ) \ & TABL 
a2 ee oe oo = = = === KEGEL EEELREKEL EEX 
Pais I 
HELELLLKERHKE 
*DA s 


EEE EEE EEE 
— 
ee ao ee 
¥ OF SOLAN TO ize # 
ry READ 2 
eimeete ment 
ea oe 
% e 
- SENT POSITION # 
LEGGE EERE REA EERE LELE 
EREENREL SE EREK ESLER 
& NEXT # 

: 
HESEEELELEESERERE 
petit titttite! 

BKGND 
HG HEA HEE HE HE HE HE EH 


DO4 
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* XT 
LEEKEKGELLERAEREE 


LHREELE RE EEE 
*ISRLP % 


SEQ O04e 


LERELERERERE 
xDATST2 % 
KEL KERRERERE 
~---------------- = sonpeassanteneens 
/ HAVE \ 
/ WEN OF THE. ‘\<--------- ye ONEXT 
/ WMEMORY BUFFER ?~ \ % 
a coaumes:, waaraunie 
REREMERRERRERERES 000000 teen een--- -- pest et ttt titetice: 
% UPDATE st / IMAGE MODE \NO * SET UP FOR # 
% COLUMN % / SELECTED ? \~-----)# PACKING MODE # 
% COUNT 5 / \ £ 
LEELHHEKALERE ERE S a. ae wont asec: welmanee 
LHELEEA KKK KL HERES | (------------------------ 
% TABLE € pesttt et iiis! 
+ e #SRETRN(20)# 
#CARD #1 IN DECK# Peet tt tt itis 
—————— 
/ WAVE WE LOOKED \NO EHKEKKLLHERE 
/ AT LAST COLUMN OF \------ >*#ISRLP x 
/ DECK ? \ HEHKLHREELHE 
I YES 
HELRKRERESLSRKEEE 
* STEP UP TO #% 
x NEXT % 
% CARD ¢ 
— 
HELGE ELLE KEKE 


CO 
DA 


1 
T 


| 
A 


feciesiciny Testine 


EO4 
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FELLALARLELRE 


#ISRDE(19) # 
— 


/ 
/ FIRST CARD ? \one 


/ INHIBIT ERROR \YES 
/ PR°NTOUT ? 


\oorre 


—ensninertentnnernirs 
EXKSERELELLSELHAREHAEKE 
* DECK CARD. rein Ss 
* COLUMN NUMBER’ % 
ee 


I 
sdokegh-kalah-totigh-Sehaigd-tet-$-totadahe 
™e OUT ¥ 
AND ” % 


- DATA x 
Ss alailadalaidaie ariclabaalaaini 


SEQ 0043 


JE SHRI SE EE Etat 
% CULATE. #* * RESET CARD * 


CAL 
--) #PRESENT POSIT- #--># COUNTER s 


*#ION OF IMPORT. # # — (CDCNT) * 
JOH HEH HEE ae 


1 oh 8 Ot Ot Oe tt dt 0 0d 


RXLRLHLAALAELEERE 
% 


S x 
/ ON es % HALT x 


NO 
HEEELE REE LES 
*ISRRT & 


& # 
HLAKKAAEERERERE ELE 





Pettitt tiie HELEREHRELES 
#DATRST (22) # #ISRER(19) # 
ESETR RMT ERED ves ana 
eee i ELAS 
# fe STACK # \NO 
. ie FROM / IS BITIS SET? — 
BURR LLL LALA LLL LAI 
I YES 
eta SEBEREEREES 2---------------- 
#DATST(17) # NO / IS CARD READER \ 
ee OFF-LINE? \ 
aww wm w nn mn we we nnn on nn no eee \ 
I amidibmbnuasdtadmanbowmwe 
V I YES 
Woon nn n- eo === HRELELEKAKEKE LAL ELKEE ~o--------------- 
/ IS CARD READER \YES / T / / IS CARD READER \NO 
/ ERROR (BIT14) \--)>7 ERROR / / ERROR (BITI4) \-- 
/ SET ? / / SET ? \ 
ore nn nnn ee -  - = === peer ttt ttt tt tsi i is wane + = == 
} NO I I YES 
SELF REEREREE--—-) Te ee a a ee a 
3S = Yh ewww wo onwnnonseeoose== / DID WE JUST \YES 
peter i tii ite! / CHECK LAST CARD? \ 
re SKKKKEERRLEREERELREE / 
"ERROR FILE \YES / T [oo ewe w nner enn ener nnn nn -- 
\=--)/ ERROR I NO 
f BNLY) ee KEAXLKKE ELS ERELAEL KEE 
oecereo-= nesascwennneanan= HELLER HLELELELE REESE REPORT / 
anaaeeeecees ee eeeen eee aaeaee= 4 


/ 
\==)/ ERROR 
\/ 


entiation es HEE AMEENERERERER EEE 
ounnuitaianiin EERE LHEELHEKEKLE ELE 
/ \YES 7 REPORT / 
Fy DATA LATE ERROR? \-->/ ERROR / 
\/ / 
ncnerintinnipetdigiemnnaimnnaite eet i tettt sit ttt its! 
I NO I 
| (----------------------- 
wneeahiginsitndainaiideinaiiaiiiaiianrs KERARKEKHKRERERELKEHKE 
/ ~ NON-EX STANT \YE / REPORT / 
jf MEMORY \=-=-) / ERROR / 
/ 
a wonen----- KHKARLE HER HRELEEKELE 
ett si ttsite 


*#DATST3(22)# 


FO4 
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RRLERERALLARRRERELEE / / 
T Lf RERERERKAARELRERREE 
/ 


EA EKELG EEE 
*DATRST (22) * 
HERE EREE RE 


SEQ 0044 


SHRRERARAARAARRELAEE 
/ REPORT / 
ERROR /=----- > 
/ / 
HLARRERLALLA RAE LELE 


RLERRETLELEE 


#DATRST(22)% 
eT eett ttt tt?! 


KLKKERLE HERES ELEEELE 
REPORT / LHERKH HEEL EH 
ERROR ’ 


[------)&] 
/ / 
itti iti tities ites. 


“ 


KREELLLRELEE 


HLKLERELELEE 
% 
RELKLERLEETE 


REEEFREEPEES 
¥DATST3(22)x 
—— 


ARE ANY BIT/S \NO / 
re FROM BITOS THRU pees 


BIT14 SET ? / / 
euamenesiaes tmenae 


Peeetttet ttt titties! 
REPORT / 


LLELREEHHEES 
¥DATRST(22)% 
KLEKEREEHEEE 





GO4 


CO11/ RemET DIAGNOSTIC DECFLO VER 00.12 O1-JUL-77 08:45 PAGE 2 
DATA ILITY TING , SEQ OO4S 


* DATA RELIABILITY TESTING FOR PACKED MODE WILL 


HHEALRRLREEEE 
# 


START AT *DATST(17) " & BRANCH OFF T 
REEMA EE EREE HERRERA 


WHERE DATA WILL BE HANDLED AS OUTLINED IN 
He EE He HE 

SECTION STARTING AT *ISR(19) WITH ONLY ONE 
HERR EEE 


EXCEPTION: DATA IS HANDLED USING BYTE CONSTRUCTION 
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ERROR FUNCTION TESTING oF MODEL M1200 SEQ 0046 


REEREEEREEES 
LHEEREELREEE #ER1200(39)* START ADDRESS = 250 
#TST33A(24)# KEKREEREREEE «—«- RUHR EAEEEE 
petti titi tis #ER12CD %-------)] 
I HEEXELKELERE ~ 
ween nen nnn == =~ Pee terre ttt tits tise SRELHEE LEEKE 
/ WAS THERE A \NO / REPORT / #TST33 x DATA LATE 
/ ae TE \---)/ ERROR / KHHLKREL HALES 
/ AA i / I 
wo een een nnn nnn nn nnn Peet ttt ttt tt tt tiie sy SHARK HELELEREL EL RARE REELS 
I YES I a Re EHELKEELEEES 
] ( enna nnn nnn nnn nnn £e INIT #£----) RINIT(4S) # 
icinnittaiiatatinteiaetintia satan £% x% HEELHHELLHLE 


ay BITS SET \YES SEELELEGELELEELERERE REKRAARARRRAREREEH EERE ELE 
a: TA one —* / REPORT / I 
47 / ERROR / auspunuasbyennsesees 


anccsenenrwenscwcoeson= / / / ASK RE- / 
NO sachin slat Pianta TEER RDINGLY / WALT & SINGLE BUS CYCLE 
a a ee ee ee a eae oe ee 4 
Tet i titi tte KELLHEE REELS ERERES 
#TST34(2S) *# 
ptititttttit Pertti titi tit tt titties! 
COLUMN COUNT# 


% A x 
% REGIS LOCATION # 
Peete ttt titi ttt tee 


$ 
HLSKERAALELL ALERT 
SEEPPELED MELEE EEX 
% START READING * 
4 A CARD ¥ 
macncsnen utealciseee 
----------------- HELE GHLE LL RALAERLEE 
/ \NO / T / 
/ 1S CONTROLLER ‘\----- »/ ERROR / 
/ READY ? \ / / 
anew nn oo nn Peete tt ttt tit t ttt te! 
Fine. I 
----------------- KEEKRERLERLELSKR LETS 
REREREEEZERERYES 8 / \NO / REPORT / ects iit iii es 
¥TST33A(24)%<----/ IS ERROR gitss \----- >/ ERROR [------- > *#TSTIGA(24)# 


HERREESLEELE / SET \ 4 / HKLELLAERELLE 


T04 
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ERROR FUNCTION TESTING TP ONOBEL M1200 SEQ 0047 
Pritt iti iiity ELEEREREEEES 
#TST3YA & #TST34(24) * ERROR + OFF-LINE 
Pertti i titi LEERKLREREEE 
cnmteanatinemenatiod EREEEEERELE LEREERES 
/ DID TRANSITION \NO / REPOR: J EEEEKEREEEREEEEEEEERE REESE 
/ TO ON-LINE OCCUR? \ ----)/ ERROR 4 £% SEE EE 
/ \ / 4% INIT #¥----) RINIT(4S) # 
awww www wenn nnn enn ne === HEAL LAEELREL EL EEES xe £% LKLELAEARREE 
ves I Pees e eter tte tt ttt ites SY 
ao nen enn nnn _ “a a ~ e—~ eunowepennensggeeey eee 
\ / / / - / 
_ a \ Sees cReDR” e /SPOND RREORDINGLY / 
/ 
wen nn nnn nnn ene auaen nee HERRERA EERE EE 
= ee HEHEHE EERE ELE EE EES 
/ TS ERROR BITIS \yo jbeeemeemrsernenes 4 HOLT BATTING 
/ SET ? \ e--=)/ ERROR / % “CONTINUE™ # 
\ / / LEHKEEERERKERE EES 
ee KEK L EGER EERE R EES I 
I YES Ta a a a ee petri titi tt ttt ites tes 
| te / JS OFF-LINE \NO / T / 
2 eee n nnn nn on -- = REKEREERLREREEREEEEE  / CONDITION \---)/ E / 
/ 7 Status REG 1 se war \YES / REPORT FA PRESENT 7? . ee / 
1 OA on sls Necgoars A ERROR Fé mereeneeuels wee eene bianca, hmeminins 
wee ne eee nn ee en nn nnn-- pee eet itt tt ttt tt ites | ae 
NO Ln een enema amen tan ae an ae LELKE REALE L ELLE RHEE 
( eee ene n nnn nnn nnn nnn nnn / 1S ERROR eres wy. / 
pet tiitii ite / wid ERROR / 
#TST3S(26) # / oy / 
BUBRRBBEBEEE a i i a a a a CRAMER REREREEHEREHS 
Pine I 
won ee een nen === peettt tt tt ttt itteseey 
/ ANY BITS SET IN \YES)= / REPORT / 
/ STATUS REG. THAT \---)/ ERROR / 
SHOULON’T BE ? if / 
wane nn nnn ene nn nea = === Pettit ttt ttt ttt ies. 
Pain NO I 
HELERGLGLE EE ERLELERE Peet t ett tt ttt tise! 
RESET & CONTINUE / ASK USER TO RE- / * HALT AWAITING * HERR EE EES 
/SPOND ACCORDINGLY /------ >»*# USER TO PRESS #----- »*TST3YA * 
/ * “CONTINUE” # SEEKKLLSEEEE 


ERROM FUNCTION TESTING. OF MODEL. M1200 





JO4 
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SEQ 0ONS 
EFELE PEEVES SOBEEEOBAANe 
#TSTISA(26)# #TST3S(25) # OFF-LINE TO ON-LINE INTERRUPTS 
——— — 
wae n enn n enon - EEG EE EEE EE LEER EERE EEE EARLE ERE ERERERSE EERE 
/ 24, ANY BITS SET\YES / T / #% ERLE RHRERES 
4 THAT SHOULDN’T \----> / ERROR 4 &% INIT R¥----) RINIT(YS) # 
BE ? \ / ¥F gE MREREELEEHRES 
csthinmesiierteatameneiiiis ——* eeepc: aumemene LHEKKLGR KREGER EERREEEES 
7 wenn nnn nnn nnn = 2 = KELLER LHEE ARAL ERR EEEEH 
Pettit tiitii titi isis % SET PC & PS # 
* RETURN PC & PS # * FOR WHEN AN INTER- # 
OR AN INTER- # % % 
4 ¥ ERHARD REE EHKLEL ELE LEES 
eet ttitiiiittt it titsie 
LEEKS REEL EKREREEES 
SERMAEE EERE REEEE x SET CPU TO 
® fre TO #*# #PRIORITY LEVEL # 
#PRIORITY LEVEL # x ¥ 
* & HERE RAKREESLELERE 
sestaaiends senmanan 
KLEKRLE HERE RRELELHAELE 
ween r ene renee === EEL HEK LAK LKAEES / ASK TO RE- / 
7 ghibr 00 OR Oh ,~ h. HANG Seti . Fiala ACCORDINGLY 7 PRESS STOP 
Nod \ * INTERRUPT # Peter et ete t esti itis! 
oo een eee e nnn e mene n= Pettit ttt tt tttst ie: I 
Cw ENTE IS OS oS aie annane meme iaate Petts tt ttt tte tttt Perret it ttt t ts ite: 
peettitttaritiiie / DID AN tg \YES / REPORT / x URN FROM # 
£ T ST * /  RUPT \---) ERROR /----->)% INTERRUPT # 
* PO ¥ / ee / Pa + 
ny Bt i a ea KRARALLH EARLE KEK EELE PPerer ttt titi iis! 
Poets iti ititiites) I NO 
a a can tyrscomanga resi aed SHEKEL ERERERHHLEX 
ween eenn--------- eeeRRRRRERREEEREREEEE «© «80S OFF-LINE ‘NO %* HANG a 
/ IS CONTROLLER \NO / REPORT * ee CONDITION \weeen > * WAITING FOR # 
ADY ? \en--) / ERROR * ee PRESENT ? \ # % 
/ fo ween eww enn en nnnen n= HLEKLEHHEK AKA E REE 
ww eee nee n enn nee nnn---- Perri tiiiit itt ii i2e I YES 
t Yes ooo neen eno == == alia" alata 
wwe wenn nnn n= = - = = = == = / \ / / 
eesti titi ey / 1S CONTROLLER \---> / ERROR / 
#TST35B(27) / READY ? Yo 2 / 
BERRERRRERRR 0 a Peet ttt tt ttt ttt tity 
i I | 
wane -- ooo -= selina ++i 
RXRRREREEREX YES / IS a. »BITls \NO / REPORT HEEHLEKESEEE 
#TST3SA( 26) #<----- / SET \----)/ ERROR Pi -------- >»#TSTISA(26)# 
HERKEREEHEEE / \ Sf / SREREELEEE EH 
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SEREREREREEE 
#TST3SC(27)# 
ees okeeind 
SELERESERERRAEESE 
s af 
¥ ¥ 
a t 
SS 
PAT oe Pete: (lca 
Ls hoy / 
eeceecccoecsecososeoee= KELKKAERELALAARAEEE 
Fs. I 
/ wore wceenoocoooe one: were 
ars a y 
ee eee wee see 
= satrap iandinseapteiiep neneanartianaiiaiinieattnaitiadtiieae 
wenn wenonmnoeneo= HHEEHHHHHHEHHEHEHE 
ff IS gGtTtS \0 / / 
oooce / / 
o / / 
ewecesosecessccescescos Pertti rt ttt ti tities: 
Pe. I 
y --<<= ANY BITS SET\YES es 
/ 
i - Lae 3 Pu 
scenoesecesenaeeresocce Terri rt ttt ttt tities: 
AS 
HHRRHHRRRERE 
#TST36(28) # 
REREREERREEE 
HREHHREEREEZE YES 
#TST35C (27) #< 


RHLLLRLELKEE 


KO4 
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SEQ O04S 
LEKEREEREEEE 
#TST3SB(26)# 
cain anna 
cemenninmiambarie = sapnenepeengpenyanes 
/ \ / / 
/ CONDITION \----- >/ / 
/ SENT ? / / 
ptcnnanatuaaniaianianaaseannina LEGGE GEER EEE EEE 
= I 
ahuaninemisbinuidabbanaapenntis pete ttt tt ttt ttt tttee: 
/ IS ERROR Ves \NO / REPORT / 
/ = * / / 
/ 
otniiniemiininnaaradia HELGE EGE RE EERE EERE 
i 
iseiamtsiieasiahiiiamaetedinanitheniiviii pete tet tet ttt tt ett e ey 
/ ARE ANY BITS SET\YES / REPORT / 
Ph ncid SHOULDN’T BE Taernn dy ERROR ; 
einen oanenseoace SonEPESRERESEERREDE 
| (-------------------------- 
Pete tit tt titi tt tte es Sy 
* SET RETURN PC % 
FOR WHEN AN I x 
x RUP % 
Perit ett ttt tt ttt eee 
HEURES EERE LEEK EEE 
x fhe cPy TO * 
me wel LEVEL - 
HEHEHE EE EE KLELA ERE 
LEGGE ERE EE EE ERE EE 
/ ASK USER T ~ J PRESS RESET 
- /SPOND ACCORDINGLY | 
creeeenenenenne 
eivitdimanainnaianiamnes annette Peete trtttttttis ey) 
/ DID AN INTER- Wo % HANG AWAITING *# 
T OCCUR ? #£=\----- > INTERRUPT : 
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ett i iieieg, 
#TST36A(28)# 
a8 £4 









SELEAEEREARERERE EE 








* SET i PC PSs fe 
uFOR NTERRUPT . 
tonounsnnnenennaneneaas 
reer chu 0. 
% 
#PR & 
* 0 T Es % 
See 
fay + re — cgene 
/ 
eseiee Sina “ER 
emia waren 
owen eneeenneen--- RELHRERERERE REELS 
/ DID AN ae % HANG AWAITING # 
as INTERRUPT - 
quaupneseibeinnmumemnen Peeper ttt ti titi te: 
I YES 
ri itiititiitiicg! 
* T ST & 
* PO ¥ 
2 ¥ 
eritiitititiiiie?: 
susspepeunespenneenanes 
oro WE A INTERUPT £ 
x # 
Peete tsiiiititiiiiiis ss! 
sdessneponsesesee 
# fy ou NIT. 
SCOL.CNT & ADOR. & 
reesientvennaeeit 
eee 2 eee 2 Seen eeaeeo RERESLE ESS AEE HRS 
® — AWAITING * 
Nena NTERRUP 
sunasuuseaueceues 





#TST368(28)# 
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SEG 0050 
HEEEEHELEEEE 
#TST36(27) * INPUT HOPPER EMPTY ELKLERERI AED 
EREPERELELEE #TST368(28)# 
I peter ttti itt! 
LHX AREHEEE SEE EAELE ERE E LEH 
Le EX RELERERELEEH SERRE REREER EES 
ee INIT #H---) 2INIT(4S) #& # T STACK # 
¥e £¥ RRERREREREEE & PO FROM # 
LEELEEHHRGEEKRRLELERELE EE * IN T # 
I HELLERRAAEELE REESE 
KLEAE HELLER RREE EELS I 
/ ASK USER i" a ae cages SEARLE RALRAA ELSES 
/SPOND ACCORDINGLY 7 REMOVE CARDS / IS CARD READER \NO# T 4 
/ / & CONTINUE / STATUS = 3007 \# % 
RESLEEREEEE ERLE REESE / \e € 
aan nnn nnn nn ERELE SERRE ESERES 
eR I YES I 
Pt eS - i rrrscencnanemes 
t USER 10 O Press LEKKLELELERE 
#TST37(29) # 
feseneneaneneants EEEEERERELEH 
--2-------------- ERERRERHREE REELED ERE 
/ IS OFF-LINE  \NO / REPORT / 
LOOT PRESENT? se ERROR f 
aa nn oe en on ene KEELE EHH AAELERERES 
= I 
eon nn none ------ Peete ti ttt titties tiie 
4/ YTS in BIT1S \NO / REPORT / 
/ SET ? \---)/ ERROR / 
/ . # / 
wa on nn no nn ne eo KLEEELGHREAERAREEE LE 
Phe I 
wan ene = = KELERE ERLE RAKES EEE 
/ IS CARD R \NO / T / 
i ERROR BITI4 SET? ees yy 
aon noe on ene eee HEAEAL SHEARER LELE KEE 
i= I 
o-2-------------- EHLRELAEREREH RELEASES 
/  #NY BITS at \YES / REPORT / 
/ THAT SHOULDN'T \nn-)/ ERROR / 
/ BE ?  # / 
wan nnn nnn nnn = == == KELRRLLE EEE RRRLELES 
Pee I 
KREERSLERE EH 
#TST36A(28)* 
HEREREE EERE 
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Pett i tii tite 
#TST37A(29)# 





Ait eae” / 


RESET 
SeHeEeEOROHENEAHEEE 
Wee SETS JHE 
/ et ‘el Bey + HANG ITING : 





/ \No # HANG AWAITING + 
x 
/ockth re N=) INTERRUPT 
/ A CARD ” \# : 
wenn nner nee e n= THEE 
I YES 
aE 


#TST37B(29)# 


MO4 
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EREEEHEEE BH 
#TST37(28) # OUTPUT STACKER FULL 
HEEKERERAEEES 
SHREERELEEEE 
LEKEREEEEEE REESE ELEREE EE £1S137B(29)* 
¥¥ gE Peet tts tite te Re EEEEX 
¥F INIT #H---) RINIT(4S) # I 
#2 4e SREREREELEEH «RERRERARRE EERE EE 
EREERERLE REE ELLE LE REELEEE 4 ST + 
I * PO 4 
ERERRAL REALS RSE E EEE # 





PRESSURE ARM 
DOWN & CONTINUE 7 IS CONTENTS 


YESI<---------- 
RELLLELE 


RELE 
*TST4O0(30) # 
FELRRESRERES 
LEKEGHEREK AERA AARLE RE 


y oro “NO REPORT y 
/ TION \--=)/ ERROR / 
/ ? ae / 


oa nme ne en noe n eens ROU eum 


/ 1§ CARD en's \NO / 
/ ERROR BIT14 SET? peas 


= 
ccwnedenememnmmas JHeHHAHHBHHHEHHEEHEEE 
/ IS ERROR BITIS \NO / REPORT / 
? \-- ERROR / 
aa / 
ow ewewessesennsenee Pete tte t itt ttsties? 
io - 
ps seetnniiceteimiibeitaiieedivceiaiiaitt Perr rrr TTT T 
REPORT / 


ERROR / 


4 / 


/ 
/ \ 7 
we en nnn nnn nr nn nnn meen samueie 


Pin 
PR SR ee Peerttsitt ttt ititi tse: 
/ RE ANY EXTRA \YES / T / 
BITS SET THAT \--->/ / 
SHOULDN’T BE ? / 


RESRRHEE 
t1ST37A(29) 4 
LELERELLERES 


S OF \NO# 
STATUS Be het * 


SEQ 00S! 


 deleheebebdebededebetetetatadl 

REPORT 2 
* ERROR « 
x * 
See SEE EE A abd aE A EE a 


NO4 
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ERROR FUNCTION TESTING OF MODEL M1200 SEQ 00S2 
SEPSELEEEE ES ERERERE EEE TE 
#TST4YOA( 30) # #TST40(29) * PICK CHECK 
SERSSEEEEEESE ents: seugumad 
eT oe ae ~~ ny eee 
/ / / * BE ERLRLLHRH 
/conot 19h PRESENT? \onn--)/ ERROR 4 & INIT te----) SINIT(45) ¥ 
/ \ / 4 ge HEEREELLE EEE 
euseasessosseussnasasee EEG EEEE EERE EEEEEES LEEEE EEE Ee REE EEE ELLE EER 
f YES ie. I 
( ww www enon nn nen enn nn-n= (0k WER TO RES” o-. a 
Pee MEER R EERE HAE i HOLD 
POR AECORDINGLY 7” 4 DOWN & CONTINUE 








I 

Poteet itt tt etter! 

x T wn T * 

% x 

% USER TO Fa ¥ 

etacae: eum 

oon omnes Peers errr ttt ttt itiee: 
REPORT / 


/ eitaitia e/a 
/ CO aERY 9 aes / 











\NO Pett itiiie3 ee enn nnn meen een nnn———— —- EHHRHHEREERERERERRES 
WN --= AT ST¥O8 & i YES I 
\ Peretti tiiig: ( wow nn nn enn nn nnn nnn 
menemaanneseso |... |. (|< «+... 1+ —~pp madmen Peett ttt ttt ttt! 
RanSiTE ONT e \NO % ¥ 
Jf a 7 x T eons WAIT FOR IT : 
ween nen nn nnn nnn nen LEEK EREEGEEREK EEE 
: YES 
re ie petri est titties y 
TST4OB a 15 CONTENT S OF \NO / T / 
MHRRRRE RHEE / STA Vane REGISTER = ry ERROR 5 
ientenneeininians on nnn nr ne ee - KE ELEG GLEE E RE REREEH 
¥ a T 4 Pha YES I 
/ / woe) oe oe 
RRRERERELE RE RRARRERS x SET COL COLUMN COUN 
I . BUS ADDR OR. AND Bea : 
ansnasenenee KHKKEEEEEERERAEEEELEE EE 
#TST4OC(31)# 
SERREREEEEEE HRERERELELES 


#TSTYOA(30)# 


ERROR FUNCTION TESTING. OF MODEL. 11200 


SREREEEEEEES 
#TST4YOD(31)# 


— 
Pe: compensa 

F DID AN INTERRUPT < 

OCCUR ? \ 4 ; 

ELGAR EE RAEELE 


Tb dcbedeidehetehebotedetatel 
+ HANG AWATTING . 
INTERRUPT 





; Tr Fae = ars 
/ STATUS. REGISTER = \--)/ ERROR / 
? \ 7 / 
ee ELK EELLE AKER EELS 
Ph I 
reece teri es 23 
#TST41(32) # 
peter itt itis 


BOS 


DECFLO VER 00.12 O1-JUL-77 08:4S PACE 31 





RRE HEARLEEE 
L ASK USER TO RE” / RESTORE. CARDS 
/SPOND NGLY 7 AND RESET 


/ 
: emacnane picdames 
= +2222 ee ----- Poser tttttt settee! 
/ DID Ad eal \NO # HANG AWAITING # 
Ps OCCUR Neehs INTERRUPT 


\ 
euminentninisinenennaimngiaaaner a AUREEEEEREEEEEEEE 
Se HE HE EE SE SE HE HE EE HE HEE HE 

¥ # 

% PO & 
¥ 


JE HHHHNHHEE eee 
* SET RETURN PC & PS 
EFOR WHEN AN NTESRGPTS 


sees 





% ; 

HERG HHHHBHHHHEHHE 
Peetet tt ttt tite! 
% READ A % 
# CARD % 
¥ x 
KERKLEELELEREEERS 


REREREL EEL EE 
xTST4OD(31)3 


SEQ 0053 





ERAbAPOncT iON FEcTING OF nOdeL 11200 


pT cit titi tig 
aTSTHLACE)# 
— 
cumantiemeaniildatiammeniinndali a. 
P . ‘ali ion Nennny/ ERROR 3 
eoqnaninan cenenenniantianiinmmnatntie eEHEEHRHEEHHHHEEES 
i m 
mennenenenmannianpaenn HEHE HEHHHHHBHEHBHEE 
/ Is St StTis \NO / REPORT / 
; gerne ERROR rd 
qoanenensnapaninmpeenepananenanmnenentntD LEGGE EERE EEEEEE 
(ves I 
“Ts ¢ eee ee 2 ee eee ee 
Py “ERROR Bria goer, NO ? 1 reg ERROR P 
seenapepevanensndonsimntinnniaginanibeninshtin SEAESERERREEERUEEOE 
I YES I 
] (------------------------- 
ECO & THIS \- ERX EEREKELE 
4 ‘NGTALLED ON bn rere % 
HEE EKEX 
I YES 
eavencnenauaanr as KKK EE HELGE ER RELLE RSE 
(VSR CH veer A \NO / REPORT / 
4S RR \om-=?/ ERROR = 
quuecunesesnineemanihenee HH ELLA LEE RS EK ERE EES 
YES 4RRHREEERERH I 
(----#TSTYI1B #( e<----=- 
Titi it ttti 
eunnwnpowenanmes ra teemaapagenenases 
REPOR / 
AN status Re REGISTER \-- ey ERROR / 
/ 
ww wwe en a we ow oe ee ee suunsnauananeuauent 
fees 
SRERESRE SEES 
#TSTY1C(33)# 


~ 
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Se EEE 

*TST41(31) # STACK CHECK 

peaks eames 
Se SESE HE SESE HE SEE HEE SE SEE EE SEE EE EEE 
ti hal  Sedehebebdedabedatatel 
Re INIT #¥----)#INIT(YS) & 
KH hal REERER ELLE EE 


LEEEKELEEAE REEL EEE EEE EE 


LLRLALLELALELE 
/ ASK USER TO RES- / ;, BLOCK PHOTOCELL 
ACCORD 


Fg POND Nay / AND RESET 
Se el 
/ HAS OFF-LI \NO AWAIT % 
/ YET? \--->% OFF-LINE # 
J \ # CONDITION # 
OP OP OS OS SSS OOD OOS See REXEL RRKRSRKEK ESE 
I YES 
women nnn own neo RARKREARLRLALEREE 
/ HAS TRANSITION \NO # AWAIT ¥ 
/TO ON-LINE OCCURR- \ % TRANSITION TO # 
/ ED YET ? oe $ 
wow eee mewn ewe en oe ow enn == HLERARHKLALZEL LAKE 
I YES 
andawenamammme FLARKAKLAAAAAERELAEE 
/ T / 


/ Stine eee 0) ERROR / 
/ 10 ? Yo / 


Pperrererert Serrerentte 
* SET UP COL. COUNT & # 
ADDR. REG. , THEN ; 


* 
a 
sn dninsnsxitnibitpincapianeiaapes SEEEREELEE KRALL ES 
4 HAS CONTROLLER \NO # WAIT % 
/ READY SET YET ? \---># FOR % 
/ \ #& IT 6 
sicehisiniicaneie samianisiseiaadsisiaiomaenitsitinas EELKKSELLLE EEE EES 
I YES 
EEKEERHEE REE 
*TSTYHLA(32)*# 


SEQ 0054 










DOS 
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ERROR FUNCTION TESTING OF MODEL M1200 SEQ 00SS 
tre titiii yg ERHLEEEELERS 
#TST41D(33)# *TST41C(32)% 
trtii iti ita —— 
“were - ¥ Wee or eee 
s £ 4 x 
: Sao SOR WENA INTERRUPTS 
* £ ¥ ® 
ean oceans KEELER ELAS RRR LE LEE 
, 
wwewn wenn wn en=--= ELERLEEELESELAKES LLLLRALHLALRLARALARARELE 
/ DID AN \NO # HANG AWAITING *# xSET CPU TO LEVEL O 8 *® 
ff I T OCCUR? baa INTERRUPT . | : SET “IE” BIT . 
er ee ------- EEK RLLSERERE pucercesi: semanas 
LEKELEEPEEE EE AEEY ah-t-tylaiet-t-t-tel-}-tal-t-Salalaly ¥ 
% T STACK # / ASK USER TO / JAMMED CARD 
* Flies ACCORDINGLY / AND RESET 
petit itt t it tsi ite KEELE RRARAAAARHLES 
wae ene wenn nnn ---- wae simpler a than = x HANG AWATTING 1 
/ / \ HANG x 
1/ STATUS REGIS ofeR = No ----- f EREOR es ed INT ? wr INTERRUPT : 
wee nr en nnn n enn nnn -- Peete ttt tte ttt ett: wanna nnn w nm w enn nn an — —— EEFEREFHRHLE FREE 
: YES I I YES 
neuueseonnen * iat eda et at ant are ESE : 
#TST42(34) # POINTER FOR 


HERRAHLERKLE 
Eeatineetianeeet 


KXEKRLT RAL REREREAREE REESE 
* SET RETURN PC 8 PS # 
aFun WHEN AN INTERRUPT * 
Meeetetirtttir esti tiie) 
EEKKKKELREL EEG EERE LESS 
xSET CPU TO LEVEL O & # 
% INIT. COLUMN COUNT # 
* § . REGS. #* 
Se 
KELEERLEA EEE 
*TST41D(33)% 


EOS 
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SEQ 0056 





SRELERERLEESE 


#TSTY2A(H4)# AEREESREERES 
BOOt _ a le ot END OF FILE & HOPPER CHECK 
/ 1S END OF | 5 ILE YES TEE PORT Peay? anineuil HELERE 
\ / / £€8RE ERERELELHLEX 
/CONDETION SPGENT? \wn-=) / ERROR 4 *% £% HHEKHLLHEREH 
/ \ / / &% INIT R¥----) RINIT(4YS) # 
<n we wwe nn nen nn ener en-== HEEL ELEESARELEL EERE £% HE ERLELARELEEH 
i= I LELKKRERGEASEELAA GALE RREEE 
ween n eno ---- === LEREKERHEEEER ERLE EES RERKELE EEE AEAAKHREEE 


/ iS READER \YES / REPORT / / ASK USER TO RES- / 2 CARDS IN HOPPER 
Ps E BIT14 SET? i teas ERROR sf ff POND RECORDINGLY 7 RESET & CONTINUE 


woe n een n----- canons encanta amie KELL GG GEARS 
( ew wwwne nn nnn nnn nnn nen == REEREE HER EEEE EE 
Pe -<----------- — ee ‘ HALT ag % 
/COMBITION Breen? wee \e--) / ERROR / CONTINUE ; 
/ \ / / SEXSUEEEERTERREEE 
wa wa ween nn en nnn anne peter ttt ttt ttt tities I 
NO I on - === === ----- Peet t ett titi tise! 
( ewe nena ne enn nnn n= HAS TRANSITION \NO #* HANG AWAING #* 
ween nnn ene n ene =- HEBEEBHHBHHERHHBHHEE fo ON-LINE | CURR- \--->% TRANSITION # 
/ IS ERROR BITIS \YES / REPORT / ED ? \ & x 
ff SET ? nowne? ERROR / wenenanannen eae ee nee EREEEHES EERE LLERE 
/ 
ween en nnn nen nn nnn nnn Peete tert t ttt titi sy EEEKEKE KEELER LE EHEEE 
7 NO [RSRRERESEXED = =©60-/ ASK erat RE- / END OF FILE 
ween een enn nn ne ee > #SECN % /SPOND NGLY 7 &8CONTINUE 
eossunesenaaneaeyepsnee HREEREREEREEE / / 
% Ay + Me PS HEKH LLG REA ERLE SEH 
RRUPTS 
% LLEKKEALEL ERLE RHEE REAL RES 
REBEEEE eee hPEREEEEEERE €* oH KHHKKEREREES 
4% INIT H¥----) #INITCYS) # 
ey we ae £% $x KEKKKELRE HEL 
+a Tre TO LE : Peepreret ttt st esti tires SS 
ue I I 
pest es ttt ttttt see 
s crcottheathebeutatous * HALT AWAITING *# 
¥ USER TO PRESS : 
eet iitts titi iiss TINUE 
* SEY “IE” AND # IE Te 
* CARD # 
* s SRHEEEESELEH 
pec esistst itis ee |  €¥TST4EA(G4) * 
EE RKKEL ALE EE 
RESEEELELEEE 
#TST42B(35)* 


| sini ‘iiilnntsnecneasnamncecnainateinemancensstite 





 Seiehekeiedeieh-belede 
#TINTIA(C3S)# 
SHEE 





I 
wg ge 
+ 
2 x 
& ¥ 
eo 
/ 18 END OF FILE \NO Pee tamer x 
/ 
“ont ion PRESENT? Reena) 7 ERROR y 
\ 
cosneasaasenasssaanname LEGGE EE ERLE ELELEERE 
ee 3 
cuasenessnananens HEEELELERE LER RLS REESE 
/ Y§ ow READER / REPORT / 
Bs ERROR BIT14 SET ? Neeser 7 , 
auccaussescnuscensanesee EEEEKERELERERERE LES 
ico I 
esesereneesccsesss JeePORT 
/OOTTION SENT? _et 7 7 
eeaeececsonsecoossessse EHHEHHHHHHHHEEHE 
= I 
aueeenecsnonasese eee ee tte teste o 
4 Car. BIT1S \NO 
+2 SET en / 
aeecceeoewcecoescscece= SEESRERERELEREELEEE 
Pi I 
REERHRRHREREREAERERE «RESTORE CARDS 
/ASK TO RESP- / RESET & CONTINUE 
SS End NE 
SESSLER REAERRERAES 
iar asiie | Sgnactat 
% 
® OBER TO Brees Fs RA LRLERKLAES 
t ONTINUE % 





FOS 
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HELRLELELELE 
#TST42B(34) # 
—— 
— ——— ge yongnes neseueesne 
Jf % HANG » 
i RTEBRUPT a INTERRUPT ? . 
SaaS Se LELEREARERK AL ELEE 
peeeer Sint 
x POINTER FROM # 
* INTERRUPT # 
nr 
~~ omens gory i ne le 
/ \ / / 
z CONDITION PRESENT \ oe ERROR : 
---------------------- - LEXRLALHAL RA EL EL ERE 
i : 
wow wn nnn nnn ne=-= HELLER AE ELE AE AKELELE 
/__1S CARD READER \YES / REPORT 
ERROR BIT14 SET? arenas ERROR i 
wenn nanan neon === === HHA HEH HE He HEHE HE HEH EEE 
i : 
eceeeernawnnmene= LEELA AERA EL ELE 
\YES REPORT / 
AS ERROR BITIS SET “ ono as 
wane nena enn n nee ---=- LERELHE LEASE L LEEKS 
2 : 
HERES ORROEEEEEEES 
x SET UP Pas eexeueEeEEEEX =©=-AN INTERRUPT (2ND) FROM 
XADDR. 10 LE ¥TINTIA(3S)% "SECN” AREA WILL GO TO 
xON NEXT INTER KEELKELEELE “TINTIA” 
KELKELLLE EEK EERE 
LEAKLH ELE KEK 
*¥SECN # 
LEEK ALE LELES 





SEQ 0057 


GOS 
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STING OF MODEL M1200 SEQ 00Ss 
LHEHLEE 
rrsTd2c (35) 
—— & 
ee RELRAAARAARAAALAAE 
HAS TRANSIT ON \NO % HANGS AWAITING * 
- ‘0 ON-LINE | \+----) # TRANSITION * 
RED ? \ ¥ > 
I YES 
cosnecesasanesese HLAARKAAHKAALA LALA LALE 
IS END OF FILE \YES / T / 


/ 
/ CONDITION PRESENT —S ERROR / 
/ ? / / 


HHLKLHHAKEEE 
*TST43(37) * 
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SEREEELEREEE 
*TST43A(37)*# BousenegpEne 
SEEEREREERES #TST43(36) # READ CHECK 
I HELELEHEREES 
www enw n nen n---- == SAREE EREEE ALEEES 
/ T§ ROLLER \NO % WAIT FUR x Peer eee tee tt ttt ttt ete seo 
/ ADY ? \----) # IT & + x peste ttt tits 
/ ¥* 4 4F INIT H¥----> RINIT(YS) # 
wow wen nn nnn nn nnn eee HEEEEERERESRLL ERE tH a4 EEHEERELHLES 
I YES HAH SR HEE HEE EE EEE HEE 
ween nono - === SHALL RHK SEEKER EES 
\NO / ORT / RELHGHES EARL A ERE KEKE 
/ YS ERROR BIT1S \----) / / / ASK USER TO RES- / RIP CORNER OFF CARD 
SET ? / / POND ACCORDINGLY / AND RESET 
wo ee nn nn en nn nnn == == peer et ttt ttt ttt tie! / / 
f YES I mca sient 
( ome ww ewww nner e ee ee - eer 
ween nnn ee == === LLERLELEE RE RHELKEERE 2---------------- LHHKKERHHARELLREEE 
is oe / REPORT / / IS OFF-LINE \NO~ # HANG AWAITING *# 
ITL4 cro re, ERROR ; - COTTON, PRESENT by ee OFF-LINE * 
wae nnn nn en en nnn nnn nnn- EKEKGHE HELE KEELE LERE ewww enw ewww nem ee enn ———— —-_—- RHE RKRERHHHRRERKEEE 
: YES I I YES 
(enweneceseceewoosowenwose= = 2 ls SO ESRC OOS OD Peet tt ttt ttittiss! 
, "18 OFA NO ue ae “To ON-LINE OCCUR- \NO # WAIT FOR IT & 
- \ / / OCCUR- edie ¥ 
/ CONDE TION bE EENT \ee--) / RED ? x % 
/ ? \ / / weer ee nen me een ennnm——=— «—- SHEER EHRRRERLEEEE 
ween enn nen nnn nee n n= === HELKKRALALE RAE REEEE I YES 
We EE se ES t,t KEKELELERKAKERKLELLE 
( peer e nnn nnn nnn enn n nena / is CONTENTS OF \NO / REPORT / 
emer ee reeseree-- / STAT GISTER \->/ ERROR / 
J va ECO #14 BEEN\NO pects ttt ete / = 100210 ” \/ / 
ater? HIS \----) #TST43B8 a a a a KELKAAKEEEERLLER KES 
HEHEHE RERELE i YES I 
I YES KEKE ELELE RESELL KEREEEE 


et oe 


ERROR 


wa en ene nenn ene nnee--- ett i titi itt tti tiie: 
I YES oh all I 
Jlese=G7STSIe (enn nnn== 
i iy 
SHSRRERERERE 
#TST43C(38)# 
SELRERREREES 


/ tes * SET UP COLUMN COUNT # 
REPORT / *  #ND ‘ 


i REG 
SE EE 2 eS EE A EAE EE A 3 


HEH EE EE EEE 
* READ A % 
% CARD 

% % 
KHL RE AREER EEE 


HXEREEKKEREE 
*TST43A(37)*% 


SEQ 0059 





= 


T05 
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SEQ 0060 


esti ittssiie 
*#TST43C(37)% 
eens wanna 


----------------- wpetittti ttt tttiite: 
ARE ANY EXTRA \YES / T / 
/ ‘BITS SET IN 1s \ornn) E / 
/ THAT SHOULDN’T BE? \ / / 
Disa -------- suecenpesnagenonsne 


< See Seer eee a2 eee eee eee e ee 


eepeneareneannanaceatey 
¥ 5 a TURN PC & 
WHEN AN INTER-# 
x RUPT OCCURS 
S snncsernansnabancunuts 
LEREREERELEL ERLE E REESE ES 
*#SET CPU TO 08 *# 
: ENABLE I S k 
LEGGE EEE EEEEEE EEE 
/ASK USER TO RESP / / es) CARDS 
/ 8 iene / EE: 
CrererenEne THEE 
2222+ +--+ ------- Tete tt tt ttt tite: 
WAIT FOR 


/ HAS T NTER- \NO # 
/ RUPT SOeUARED® were 


/ \ * 


HERES eevencaneatenns 
ti ee | 
SER E TT RES EERE 


SEERKHEESRAEKAEEE 
a wer STACK # 
* POINTER FROM # 
% INTERRUPT # 
KEERRLEELERREELES 


EE EE EEE 
xERI2CD st 


JOS 


SO oO Fon penn O88 iC 1200 DECFLO VER 09.12 Ol-JUL-77 08:45 PAGE 39 ace om) 


"EP PUREE. HRS ROLE TNE 


HE He ee ee 
STARTING AT#ER1200(24)*% WITH ONLY ONE EXCEPTION: 
EKG ELE EE EEE 


pbbebet Sb Sohdedl 
*T5T42(34) * IS NOT EXCUTED (START ADDRESS = e10) 
He ee Se HEHE HE He Se 
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SEQ 0062 


REREEEE 
petit iti isie *CKSAME % START ADDRESS = 240 
#SAME1(4O) # ESS 
RHEREE GD EEE I 
I HHLHEREHREE 
ieietacataaasitl aati iiiaiaiitian T LORD / 
/ ws \YES / PA INT / 
CTED \----- I / (11:0) / 
/ ALSO 7 : KEEE : % 
I NO I RELKERELELHEE 
TTT tii titi i titi tiie I % HALT AWAITING # 
#SET nee IN- # : 19 
* DICA TUS # oa 
B ¥ I HELE EE RHEE EER ER HED 
ERREEEESERREREREEERREE V 
KEEEREERREES Peet ttt titties tt estes! 
eerie tii tt itiitt Mette tees CY xED AND MASK 
* INTITIALI ¥ ¥ le THRU 1 ae 
: C sooelfaleptatosset 
# 
peti itiiti titties. ge oy ll 
Tet tititiititiiitisiitg?) DESIRED SulTCH / 
ADDR. * / REG TIONS 
eet ¥ REE KEKE LES EKER HERE 
aC TO 120(8) S.# I 
PT eTiitiiiiitiiiitsiiie: pert t ett titer ite 
T pAATTING x 
REKEEE ERE ES ERERE x TO ss # 
+ we aa ra x TINUE % 
* A # HRRKGREELE KALE ES 
* k HHKRELHKLLLES 
Teer itt itt i tilt xCKSTRT one n--- n= === 
LEEKEERLEEESE SEEKER A LARK RRL H ERE ERLES 
SEES EERE EE &t 4% LEEK LHHLKKE 
x T & ke INIT H¥----) RINITC4YS) #& 
& # RE Ee HELLER KEELES 
¥ KHELEEREEER REEL ERERE EERE 
peetiiittitiitit ey I 
I REKKLLA RRR EK EERE RERE EH 
aoe eee e eens nee Peet titi tte iiss x ai “gt T #& 
\NO % HANG AWAITING * * (TOTCRD) € 
/ 1S CONTROLLER \----># CONTROLLER #* * COUNT (TO 
Y ¥ Y Pee eee te ttt itt titties) HEERELLERHEE 
ecoocoerocosesosecsese= ARLE E EE EEE [4 enna nnn nnn nnn = = - ECKL OOP * 
Sm ESE = einai ie ee HEREEEREEEKH 
SHEERS REREE / PACK \NO HEALFEARRKEEEE 
41) # / BEEN SELECTED \------ > ¥CKREAD £ 
SRSEEREE ERED / \ KELLERKELEEH 
I YES 
LELLERREREKE 


*¥SAME1(4O) * 





LOS 
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SEQ 0063 
HEEEHLELELEE 
#SAMEE(4O) * 
aes i 
NO WE HAVE. AN \YES Pertti i tities! 
/ ereor ENB TEON? \xes----» HCKERRCGE) 
/ \ EEERELEEELEE 
I NO 
/ 
/ DOES DATA MATCH? \---e--eoooon oon nr nn nnn : 
MERREREREEER 0 ween ers n rr en== I 
*#CKL on nnn nnn nnn >I YES I 
SESEEEEEEEEE ER RR ee ee a ea a I 
LELERHLHKERE I 
/ PACKED MODE ® \------ > *¥CKFAIL(43)# I 
Peeet tt ttite! i 
i YES I IMAGE MODE 
REELEEEESERERE RAE PATH 
* UPDATE THE # 
s COLUMN x LERESELEERES 
% #CKLOP2(41)# 
sacar, wearin prettiest tttt ty 
ere OE ee = es svpeespenpanenacepeneeee 
x re / OOKED + 
¥ LOOK a Beween >/ ar EL e010) \ sah MASK OFF IT IB % 
% NEX & / COL ? \ ¥ 4 
pert tet tt tit ttiie? ee ae -<------ ieieeerant: mneenethces 
BEESEEREREER 88020 eee emee 
#CKLOOP % / NNO ««_- EH 
REEMEKLRE SEL / DOES DATA MATCH? \--->#CKFAIL(43)# 
/ \- RRR EEE 
I YES 
KEKEKEE EERE ERASE 
& UPDATE # 
% COLUMN x 
¥ COUNT € 
eae: aecuame 
ono ------------ pevtt tit tt ii itiily 
/ HAVE WE LOOKED \NO & ae 4 
/ @T@ALL 80010) \---->#L AT NEXT # 
/ COLUMNS ? \ é > 
eerie: ------- Petes iti titties cy 
KEELEEEREEEE SEEKER EREEES 
*CKLOOP é #CKLOP2(41)# 


COL cpee CARD READER DIAGNOSTIC 
PROGRAM TO LOOP ON SINGLE DATA PATTERN 


/ 
/ 


 delohebeh-hebehet-dotet-leledel 
- HANG AWAITING & 
TRANSITION tne--) / 


: 
EELELLALAELRLRLE* wen nnn nnn nnn 


MOS 
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LELERERUEERE 

#CKERR(41) # 

EERE 
I 


/ IS OFF-LINE lag 


DITION PRESENT? 


A 
& DING 
sccsuman sumed 


SEQ 0064 
/ WAS THERE .e 
Licadeapresiaiaie 1 OMIA ERROR? ‘\re====-t 
/ \ 
cocoon een no= -->I NO I 
I HHEERLEREAE SERRA K EH EE I 
I / REAL LIVE / I 
: E. DEADLY ERROR ! Ps ; 
: LHL ELK ES EERE REE 
I HERKLLH ALEKS I 
I *CKLOOP x I 
: HERLLERREELE I 
I I 
I Y 
: WERE 
: warn enn nnn nnn nnn / ATER ae PACK \ 
I nieantaniasiidhimaeeanmmiinenaniimianine 
: I NO 
I NO / WERE WE ATTEMPT-\ 
] ( ene nnn nnn nnn nnn nnn nnn ING IMAGE MODE? 
Fn es es 
petit i trite se: 


*CKLOP3 * 








NOS 
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PRIGRAM TO LOOP ON SINGLE DATA PATTERN SEQ 0065 
$36 ee EE EEE 
#CKFRIL(41)% 
oT Oe SRERERERE ERE 
SHEERS 


/ \YES# # 
/ WALT ON ERROR ? \-># HALT # 
/ \4# 3 

















EEREEE EEE EREE EERE 
/ INHIBIT ERROR \YES EERE HHEREE 
/ PRINTOUT ? \~-----) HFAILI(4S) # 
/ \ HEKEREREELKE 
I NO 
/ieegampenesrmeneneee 
NYES BRE / TMERDINGS / 
\----) #CKLOOP # / / 
\ $636 HE HE HE Preeti tet ttt t ie ty 
\NO REARRERERS EE 
\~--=) HCKLOP2 (41) # 
\ pT ett itt itis: 
I YES HE EEE 
Titi iiiitg / TYPE IN 7 
KL # / WHICH was / 
Tiititciiit} / DE / 
semcienacas gas 
a ge pe 
TO # 
NAL VALUE * 
atin’ weciuaien 
“ORE WE DOING \YES § TYPE INCORRECT BYTE # 
/ \ 
/ MiB Et TER ti, 


OF 


42% 

; TYPE CT WORD , 
VAL NO. & 

: TOTAL NO. OF ERRORS + 

PEKLSEAEHRSSAARALARREELEE 


we 
HFAILI(C43) # 





4 4 be a 8 


pRoGnan fo Loo On TEST 


BO6 
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ae 






I 
JHE HEHE 
* ST & 

. OF % 






#1ST INS. Score # 
se 


Bony / 





LEEEEEER EEL E REL EEE LE EE 


x 
% JuMP TO TEST ¥ 
¥ SELECTED ! s 


SEQ 0066 








BO ROTO Fron BE AOR DIAGNOSTIC DECFLO VER 00.12 Ol-JUL-7/ 08:4S PAGE 45 oe es 
wTittitietis verti tittiit 
“CKOFFL(Ce)# #INIT(O8) # 
seneepeneees mes sane 
wn nn nnn n-------- SEER EEE REALE EERE SHHAEAERERESERESEEEEEEES 
J Is oer beet bi Bia: ZOKOFFL ast CKOFFL $i----) #CKOFFL (45) 
at mrEretitiitt! 
suaebereasetaasuseees Se HE HEHEHE HEHEHE PUGH 
omeihaeeniinea JUUHHE EEE Ex 


/ \NO # HANG AWAITING ~ 
fs IS CONTROLLER ee CONTROLLER 





READY ? \ READY : 
ano ooo one = = = === Peerrritt tt trite ¢ | 
I YES 
a. 
£ 
% POUERUELEAR 4 
¥ NUE & x s 
Tritt titi t tt tii ey SRpRERORURINETRED 
PTT itiiiice an- 22 -- - === +--+ eee ett tt tee ttt ite oe! 
¢ Fg IS STATUS REGIS-\NO / T / 
PT ett is iii it TER NOW ALL \=--)/ ERROR / 
Ps CLEARED OUT ? a / 
wen wn cen ewe n nnn n=- == Peet ttt tt tiie tt tite: 
I YES I 


TE SESE SE AE Ae EAE EE AE TE EE EH HE HE EE 
¥RETURN TO WHERE ROU 

*TINE “INIT” WAS LAST # 
% CALLED % 


DOb6 


SEQ 0068 
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LIST 


Ua CARD READER DIAGNOSTIC 
FLOW T CROSS 


St] 
- 


uss 


—=—@ 1-4 
o-rT 


rT 
3378S $ 


F778SSP 


24 


17 


16 


1S 


13 


le 


35 


cucu rar u 
SAAS oronuMMGG ou Fr 


SNF OMS Sa ee 


— 
a 
e 
w 


tt pe i TT 


ee BS ShS 





E06 


SEQ 0069 
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Ic 


LIST 


OI 


CARD 
FLOW CHART CROSS 


COLI/ 


S88 


UOT TST 
a oe ed Oo et 


22% & & m 3 
RB At Hototrortatittititietttetetete tote iat ttle tete tel slatete lata) 


BASS EAR ttitrMttttitet te teteteteteteteiiet ttehs teil ate tetel a) 


VRNNUIEM AAAS eRRe TS soaae 
ie 5 FBS 


he pay ee 


RR RRA RR SAAR ARRAARS ee c--6-5-6- 





eel eel ce et el ee dk ed ll ll 


FOb 
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FLOW CHART CROSS REFERENCE LIST SEQ 0070 


07 


SE@ 0071 


GC6 


1-JUL-77 08:39 


INIT IONS AND VECTOR ASSIGNMENTS 
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OZC08.P11 


Y & CPU AT LEVEL 7 







: 


T CLEARED 
1 LEVEL 
ae 

COUNT 

GIS 

ON BUS 
1STER 

ACK MODE 





RE 
REGISTER 
ITd 
oa 
READ 


ALL REGISTERS 
ATUS REGI 
Fatt are 
GH 
TO CARD 
ER IN NON-P 


HOPPER CHECK 
EST 


2 
HI 
Old 
TEST 
tate TESTS 
ERROR 
4 AND 
CK 
NE 
D 
NE 
AND TYPE 





FULL 
CARDS T 


OFF LINE BITS 
TY 


Bs. €£s Ge Ge Ge € es Gg. 


ION TESTS 
OF 


: IN a 


Ef 
EA 
+, 





fait 


eae aem £ es oF Be Ce 









1A 


+ 


Sunes 


+ 
= 


—_ 

¥- weather tine. ttaieate cum 

ae SUNT NON RASA SAA SRUNRRONGGS Z PPee ae 
een ee ee en eee eee ne en ed ae TN ee od ed ed od ol co 


ee ee a eee 


0 OCTAL (ASCII) 


a | 
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OZCOB.Pil TABLE OF CONTENTS SEQ 0072 


COMyeRT pier TO DECIMAL AND TYPE ROUTINE 
TRAP 1 


495 1 ABLE 
4967 POWER DOWN AND UP ROUTINES 
$017 DATA TABLES 


MAINDEC - 11 - OZCDB-B MACYI1 27(654) 
O7CDB.P11 


: 
7 
176000 
1 
1} 
le 
f 
f 
17 
i 
000001 


TO06 


1-JUL-77 08:39 PAGE 1 


i. 


RAL HEME, TARS, . SCMTAG, . SCATCH, . -SERROR, . SERRT SERRTYP SETPRI 
EQUAT. ‘SETUP’ .$TYPOCT. .STYPE, .STRA® GE 
NEWTST’ .SSCOPE, .SEOP, .$ACT1i, .STYPDEC, SOMMENt. ENDCOMMENT 
$SWR=176000 
TITLE MAINDEC - 11 - DZcDB-8 
*COPYRIGHT (C) 1977 
: eDIGITAL EQUIPMENT CORP 
; HHAYNARD maSS. 01754 
| NPROGRAN BY FE. RYAN 
'¥THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
; HPACKAGE (MAINDEC-11-DZQAC-B1),AUG 29, 1975. 
éTN=1 
:COPYRIGHT (C) 1976, 1977 
‘DIGITAL EQUI CORPORATION, MAYNARD, MASS. 
-THIS SOFTWARE TER Gren WBE. OOF FOR USE ONLY 


Me aes, 
OR THe é afte ERO PERSON EXCEPT 


sFOR USE WHO AGREES TO THESE 
ig CEN "DE Whe OOUNERSHIP OF THE SOFTWARE SHALL 
“A TIMES REMAIN 


ne Deo ON IN THIS aie 1§ SUBJECT TO CHANGE 
ITHOUT AND SHOULD NOT BE CONSTRUED AS A COMMITMENT 


; THE 

5 

;BY DIGI ITAL TEQUIPHENT CORPORATION. 
;0 


5 0é.C a ee ean ILITY FOR THE USE OR RELIABILITY 
a Ts S$ Pout NT WHICH IS NOT SUPPLIED BY 


SEQ 0073 





JO6 
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OZC0B.P11 


4 
45 . SBTTL OPERATOR PROCEDURES 


;STARTING ADDRESSES ARE: 
200=1 TION AND DATA TEST a THE CD11 








47 
48 FUNCTION T TEST OF CD31 (M-1000/M-200) 
: SINGLE See PATTERN TEST 
. FUNCTION TEST FOR CD11 (M-i200) 
-SWITCH REGISTER seri oF OR THE TION AND DATA TEST ARE: 
Sud2=1 RUN I IMAGE ONLY 
SWO3=1 RUN BR rAck Deek, ONLY (IGNORED IF SWO2=1) 
SwO4=1 FOR THe hay Test 
: SWOS=1 T ANDARD 80 CARD 
: Test a (HITTING VOOHT ENE HL thie START TESTING 
hate bE CK IN RCCORDANCE WITH CURRENT 
=0 ONE DECK TO THE NEXT. 
. HOPPER IS 
4 
5 
; ; waite” x | 
? = BF TER THE FIRST 
7 : SWO7=1 T 
vy Brit cron en o 
7s yNRNG THEN 
z , men TO ENTER THE 
? TA ERRORS WILL 
(L BE INCORRECT. ) 
SWil2= 
SWia= 
: SW14= 
Ss : SW1S= 
; OPERATING TION AND DATA TEST: 
COA TEST DE T DECK nt AND PRESS “START” ON THE CARD 
READER. IF THE DECK BEING USED IS NOT A STANDARD TEST 
REAOe ONLY THE peg PORTION OF THE TEST CAN BE RUN. 
; (Su? MUST BE SET 70 ONE TO INDICATE THIS). 
LOAD SA 200, THEN SET THE SWITCH REGISTER SWITCHES TO THE DESIRED 
COMBINATI 
93 3. PRESS “START” ON THE CONSOLE 
34 4° NOTE THAT RUNNING THE COMPLETE INSTRUCTION TEST 
9S . REQUIRES THAT THE INPUT HOPPER MUST RUN OUT OF CARDS 


wan I - 11 - DZCDB-B MACYI1 27(654) 1-JUL-77 08:39 PAGE 3 
OPERATOR PROCEDURES 


OZCOB.P 


SaUGRToNKSRRIRRPERES EES & 


1 
1 
1 
| 
1 
1 
1 
1 
1 
l 
1 
1 
! 
| 
1 
1 
1 
1 
1 
1 
| 
1 
1 
1 
1 
1 
l 
l 
1 
l 








KQ6 

DE STP RL Oy HE" Tg 3 
RAE BOG ge TE Au RE ne Bl 
FA's PARP SORE BPPlien” > OS FY econ 


; SPECIAL SWITCH REGISTER SETTINGS FOR i oe FUNCTION TEST: 
iiss 10 ALT ON ERROR 


; OPERAT NG FOR ERROR FUNCTION TEST: 
gs Les CARDS INTO INPUT HOPPER. 


ON 
: CORD. THE = THE DESIRED SWITCH OPTIONS. 
5. FOLL OK THE INSTRUCTIONS AS THEY ARE PRINTED OUT. 


iSINGLE TET HALT ‘Toab- Sra IN ADDRESS OF DESIRED TEST (TESTI TO TEST 22) 
Tis Test “UBES TRACE’ TRAPPI wm tte Wr ice IF Sui2 1S NOT SET 
IGNEL at "TR THE LOCATION OF DIFICULT DATA ERROR 
HE SWITCHES 
OF THE TOTAL 









E 
The Con ON THE 






é. tate ONSOLE . 
3. T ~ IMAGE 
: piri. ha Sul 1-SH00 dy THEN PRES Midd oa a 


SING “RESET” ON THE CARD 


et a TA — THe, 


tt MPG Bc Pe 
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| ozcpg.P11 DEFINITIUNS AND VECTOR ASSIGNMENTS SEQ 007% 


JE EAE bt 
REGISTER (CDST) BIT DESIGNATIONS 





: BIT 0 

ey 

13 ITION TO ON LINE 
; T4 16 

1s 17 

TED ieee 

BIT 9 MEMORY 

: ait 10 

: BIT 12 

BIT 13 (M1200 ONLY) 
mali nse 

© SEE I EE GG EE IE a 


.SBTTL BASIC DEFINITIONS 

- #INITIAL SS OF THE STACK POINTER *#** 1100 #x% 
001100 STACK= 11 

EQUIV , ERROR H Ble Derint tion OF ERROR CALL 
177776 


EQUIV I0T 


i 
HE 
; t77778 : PR HY REQUEST REGISTER 
1 +: ME SWITCH REGISTER 
DDISP= 177570 3 DISPLAY REGISTER 


-#GENERAL PURPOSE REGISTER DEF INIT 
40 + oCisTER 


: = L 
RS= 45 gs : 
om 


ce He tae 


be er te Oe Oo BR  * = Ps bb P= Pe be 
VaR PAIN SSSGHA Powe DSO MENT Ce Obes 
Nene TFHESH—S5SB 


— — &— &— &— 8 bP OO 

QSSBSRRESR— Owe 
on y oe 
BSSSosec 

' x 

et ~ 

© 

< 

abe 5 

3 

3 

BS 

eae 


te i 


iaccgeagcus 
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eth 


eerrens 


A 4 
7 


nthe the ks 444+ 
: ¥ a T=". cr +44 


Be aa. ba.) tat erate 


aw? 


eS 





BASIC DEFINITIONS 








MO6 


i-JUL-77 08:39 PAGE S 
SE@ 0077 


-EQUIV R7,PC ; ;PROGRAM COUNTER 


0 
; 
LEVEL 3 
4 


LEE 8 





<<<<<<<<<< 


=n 


eet pew Gee Bee be 








Tenn 


4444 








NOG 
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D2C08. P11 BASIC DEFINITIONS SEQ 0078 


S 


i 
249 -EQUIV 681T09,81T9 





. A 
<<< 








TF; ’ 
1, 
6 “EQUIV BITOO;BITO 
i 
4n0 C "CPU" TRAP VECTOR 
+4 4 $3 ERRORS 
47: 10 2 GAL INSTRUCTIONS 
4 33 
4 33 
-D- 5§ INT TRAP (BPT 
\ + P TRAP (IOT) *#SCOPEx# 
‘ Hai TRAP (EMT) ##ERROR*# 
i 1 TTY KEYOOGRD VECTOR 
: : PROGRAM IHRERRUPT REQUEST VECTOR 
: SPECIAL EQUATES 


a ye oo 





a 


.SBTTL TRAP CATCHER 


ph gh gh 44 4h gh 44h 
. +, 


SED LOCATIONS FROM 4 - 776 CONTAIN A ”.+2,HALT” 


SAE SE bec crs 


+ 
Se 74 
3g} ppoiee n99000 DISPREG: . 0 ; SOFTWARE DISPLAY REGISTER 
p92 000176 SWREG: . 0 - SOFTWARE SWITCH REGISTER 
5 

.SBTTL STARTING SS(ES) 
39¢ 000200 000137 002170 inp aepecin -: JUMP TO STARTING ADDRESS OF PROGRAM 
597 . SEELREEESE REE EEEE EEE ERLE REELS LEELA EE EA AREA ERLE REEL ER LE REE EL ERE 
¥+: 


.SBTTL ACTI1 HOOKS 








coed 
B07 
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11 HOOKS SEQ 0079 








SsyPc= ;SAVE PC 
SENDAD ;;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
“WORD 20000 ::2)SET LOC.S2 TO 20000 
" =§SVPC :: RESTORE PC 
-=14 
"WORD  TRTRAP 
340 
ADDITIONAL STARTING ADDRESSES 
900210 .=210 
000210 137 o1S642 IMP ERCD11 -FOR CD11 (M1000/M200) ERROR FUNCTION TESTS 
2220 
000220 Spor a? 024100 IMP TESTX “FOR LOOP WHICH WILL CONTINUTALLY RUN 
“ANY SINGLE SUBTEST 
000240 rina 024624 iw CKSAME :TO READ A SINGLE DATA PATTERN 
: CONTINUOUSLY 
=250 
000250 850 ii ‘sy 015342 IMP ER1200 FOR CD11 (M1200) ERROR FUNCTION TEST 
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oe 


a a. ae + + + 4 + + a | 
ee ee te ee te ee ee ee ee be ed 
ee ee te ee ee ee ee ee ee ee ee Be be ee ed 0 


SERS 


8883s 
eam es ne be 





— 
MOR PSRBRPNGSH SHOR PORSS 
a ; 
; 
os 
+ + + 
> 


NSeswo FuLowore 








oS EE SE EEE EE 
.SBTTL COMMON TAGS 


5 THES ae ag te VARIOUS COMMON STORAGE LOCATIONS 


e 


a 


ae 


ee 
Gree Quant pews fees 


SUSSSSSESENSSEES STUTAU NS SaRSRSREaAaaS 


-=1100 


5338 
A a a Sa 


¥ 


OOodoROOOoOOOoOOooooo Co ee 





 AUESS & BAIL LETT 
ts Arle 
sp ty 
-sTTY Pat i G. Ss 
HN PRR ROTEL SE SEE 
-=CONTAINS NULL F LLS 
F R a” FEED” 
Nei I FLAG (att eb?) =0=/ES) 
shee ) AINED 
1) 


gue 
5% 

os RAINS (¢ ) 

1 CONTAING ({ GeO) +2) 
:CONTRINE. ( (SREGAD) $6) 
+ CONTA ({ )+10) 
Conrad ({ )+12) 
; ;CONTA (( )+14) 
TUBER DEF ( (SREGAD) +16) 
ee ee 

- USER per iNeD 

; ;USER INED 

- USER DEFINED 

--USER DEFINED 

-;USER DEFINED 


SEQ 0080 


MAINDEC - 11 - DZCOB-B MACYil 27(654) 1-JUL-77 08:39 PAGE 9 
DZCOB.P11 COMMON TAGS SE@ 008) 
IMES: O ;;MAX. NUMBER ” ITERATIONS 


fie ASCIZ (207) ¢3779<377) $36 F 
: Bee Wis i Re 
SLF: -ASCIZ . 


(12> 
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OZCOB.P COMMON TAGS 





ED? 
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SEQ 0082 
; LLELELLALLLLAALAAEEE SESKARLEREEREEERRERE RARE SE xe REALE RERRERRA AERA LELERE 
{LOAD POINTERS AND GENERAL STORAGE ae 
Rae ae REP ORRATION 1S as 
epee: 177162 
CDBA: 177164 
coe: CL ee CE ee s tee 
: THIS vALIDS 
‘DURING NON-DA 
TRTRAP: RTI ‘RETURN FROM OTRCE 
INTVC: 230 ‘ADDRESS OF CARD READER INTERRUPT VECTOR 
COUNT: 0 ; USED FOR TIMING 
INTFLG: 0 tHaT 3 N T T IS FE OUNO 8 aT 
LG: 0 i Nb cnTTCH BE AND NORMAL FLO 
PROC: 0 ‘tne STATUS WHEN TRACE TRAP MUST BE CLEARED 
ERFLG: 0 TO RO 10 DATA ERROR HEADING 
CKRF: 0 Fag F DECK 
COUNTG: 0 STG 
Cpioco: 0 *M-1200 OR GUNTER IN TEs CARD READER DETECTOR 
_SBTTL ERROR POINTER TABLE 


s*THIS TABLE CONTAINS THE aa FOR EACH ERROR THAT CAN OCCUR. 
cael lor eee, iS 15 hun BY OT ek tat wey NUMBER FOUND IN 
ION SITEMB ant cA CH ITEM IN i, TABLE IS PERTINENT. 
O THE ONLY PERTINENT DATA IS .. 
EACH ITEM th THE T CONTAINS 4 POINTERS “EXPLAINED AS FOLLOWS: 


3% EM : MESSAGE 
: DH iT POINTS TO TO THE Bata HEAGER 
: i OT Bs} tk TO 
i. OF POINTS TC THE pata FORMAT 
SERRTB 
-ITEM 1 
EMI ;STATUS REGISTER (CDS) BITO7 NOT SET BY 
: INITIALIZATION PULSE 
DH1 : (PC) (SP) (COS)  (CDD) (PS) 
OT1 SREGS, STMPO, STMP1, SREG7 
0 -OCTAL VALUES 
-ITEM 2 
EM2 COLUMN COUNT REGISTER (CDC) NOT CLEARED BY 
; INETIALIZATION PUL SE 
DH2 ; (PC) (COS) (CODD) (CDC) (PS) 
OT2 : SERRPC SREGE, STMPO, STMP1, STMP2, SREG7 
0 -OCTAL VALUES 





MAINDEC - 11 - OZCDB-B MACY11 27(654) 
ABLE 


COB.P11 


8 
el 
Ww Ww 
— 
mw © 


888 
Pee Be ee 
Wy) 
pose baat 
os 


sae GME Ee 


SESE SSeS SSEU EES © 
S888 
SONS 


2 


£tttercig 
T ¥ 





ERROR POIN 


7 


e 
3 


ae 


037024 


037213 
o44254 
045236 
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; ITEM 3 


58 


-ITEM 7 


ITEM 11 
EM11 


OH} 
OT1 





; BUS REGISTER (CDA) NOT CLEARED BY 

s INITIALIZATION 

- (PC) (SP) (C (CODD) (CDA) (PS) 
i Sear SF , STMPO, STHP]. STMP3, $REC? 

sOCTAL 


;STATUS REGISTER CONTENTS INCORRECT ~ 
(SP) (CDS)  (CDD) (PS) 


seme, SRE UTMPO, STMP1, SREG7 
COUN 


; COLUMN REAR (CDC) NOT CLEARED 


Pree 5 
t SERRPC, SR Gb, STHPD STNPL. COTNP2, SREC? 


-OCTAL VALUES 


‘me BTA ALL eae (CDA) NOT ABLE TO BE 


eit hte, sbi! Res SBS 


SOCTAL VAL 


BUS ADDRESS REGISTER (CDA) NOT CLEARED 
BY POWER CLEAR 

(PC) (SP) (CDS) (CDD) (CDA) (PS) 
; SERRPC, SREG6, STMPO, STMP1, STMP3, SREG7 

-OCTAL VALUES 


CONTROLLER DION’T CLEAR ON 
; READING 

- (PC) (SP) (CDS) (CODD) (PS) 
- SERRPC, SREGS, STMPO, STMP1 , SREG7 










at ~ 11 - DZCDB-B MACY11 27(654) 
0ZCOB.P ERROR POINTER TABLE 


436 yr 000000 





i eae 
—_ NOU © wfue-OS 
= = + + 
—— ee 


eee ae Pt 
is 


s ITEM 13 


EM13 
DH1 
OT! 
0 


; ITEM 14 


HL 
OT! 
0 


-ITEM 15 


EM1S 


DH1 
OT1 
0 


>I TEM 16 


EM16 


ig 
0 


-ITEM 17 


EM17 


DH1 
DT1 
0 


ITEM 20 


EM20 
DHY 
DT4 
0 


GO? 
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SEQ 0084 


-CONTROLLER DIDN’T SET WITHIN ONE -_ 


iP SERRPC, SHEE, STIR STMPL SREG? | 


: OCTAL SEAL VALUE 


; ER (OTS S) ey STO Resist’ (CDS) 


 SERRPC SRECE, STMPO, STMP1, SREG7 
-OCTAL varure 


;BIT/S SET IN STATUS REGISTER (CDS) THAT 
: SHOULDN’ T 

: (PC) (SP) (CDS) (CDD) (PS) 

: SERRPC, SREGH, STMPO, STMP1 , SREG7 

-OCTAL VALUES 


; BUSY’ SET IN STATUS REGISTER (CDS) 


> SHOULDN 
: (PC) _{ P) pase. (cop) 
 SERRPC MPO, STMP1, SREG7 
: OCTAL aues’ 


RESTORING CPU STATUS AFTER READING A CARD 
‘CLEARED CONTROLLER READY IN STATUS REGISTER 
: (PC) (SP) (CDS) (CDD) (PS) 

: SERRPC, SREGH, STMPO, STMP1 , SREG7 

‘OCTAL VALUES’ 


:NO_IN NTERRUPT T OCCURRED 
- (PC) (SP) (CDS) (CODD) (CDC) (CDA) (PS) 
; SERRPC, SREGE, ,STMPO, STMP1, STMP2, STMP3, SREG7 





MQINDEC - 11 - DZCDB-B_ MACY11 27(654) 
ER TABLE 


OZCOB.P11 


e 


ERROR POINT 





1-JUL-77 08:39 PAGE 13 


- ITEM 21 


EMe 1 


0 


; ITEM ee 


“ITEM 23 


EMe3 
OH4 
OT4 
0 


> ITEM 24 


EM24 
OH4 
DT4 
0 


- ITEM 25 
EM2S 


-ITEM 27 


; ITEM 30 


HO? 


lie a see sri ine epee, sae) Bsa 


- INTERRUPT ALREADY OCCURRED AT A HIGHER LEVEL 
: (PC) (SP) (CDS) (CODD) (CDC) (CDA) 
: SERRPC, SREGH, STMPO, STMP1, STMP2, STMP3, SREG7 
-OCTAL VALUES’ 


; CONTROLLER READY NOT SET 

(PC) (SP) (CDS) (CDD) ¢ 
 SERRPC SREG6, STMPO, STMP1, STMP2, $ 
-OCTAL VALUES 


; INTERRUPT ALREADY OCCURRED AT A LOWER LEVEL 
PC) (SP) (CDS) (CODD) (CDC) (CDA) 
 SERNPC Pet , STMPO, STMP1, STMPe, STMP3, SREG7 


-AN INTERRUPT OCCURRED AT TWO sda a Levels 
(CDS ) (CDC) (CDA) 


: (PC) (SP) ) 
: SERRPC, SREG, STMPO, STMP1, STMP2, STMP3, SREG? 
-OCTAL VALUES’ 


;ERROR (BIT15) NOT SET IN STATUS REGISTER 

; (CDS) - SHOULD BE 

; (PC) (SP) (COS) (COD) (CDC) _ (CDA) 
i SERRPC, SREGE, ,STMPO, STMP1, STMP2, STMP3, SREG7 


sNON-EXISTANT MEMORY (BITO9) NOT SET IN 
Stas REGISTER ( io? va BE 
(CDS) (CODD) (CDC) (CDA) 


(PC) (SP) 
 SERRPC SREGE, STMPO, STMP1, STMP2, STMP3, SREG7 
OCTAL YAL 





SEQ 0085S 


(PS) 


(PS) 


(PS) 


(PS) 


Sse © 


1 
1 


NOUS Gore 





001560 


001864 


001566 


001570 
001572 


0 1 


001876 


001610 
001612 


001614 
001616 


001620 
001622 


00166 


040576 


-B MACY11 27(654) 


Beebe P11’ ~ “ERROR 


POINTER TABLE 


1-IUL-77 08:39 PAGE 14 
EM30 
CH4 
DT4Y 
0 
- ITEM 31 
EM31 


OH4 
DT4 
0 


- ITEM 32 


EM1S 


-ITEM 33 


-ITEM 35 


EM34 


DH1 
OT1 
0 


ITEM 36 


EM3S 


OH1 
OT1 
0 


Is a (BITOS) NOT SET IN STATUS 
gic sit, ‘sine Bere, STH, sREG? 


i: 
(PS) 


; 
5 RE 
; 
op 
:0C 


-EXTENDED NEMORY (BITO4) NOT SET IN STATUS 
‘REGISTER (CDS) 

; (PC) (SP) (CDS) (CDD)__ (CDC) —_ (COA) 
 SeReec ,SREGE, STHPO, STP, STHP2, STMPS, SREG7 


(PS) 


: (pC) (CDS) (CDD) (CDC) (CDA) 
; SERRPC, SR SREG 2 STMEO, STMP1 , STMP2, STNP3, SREG7 
; 


(PS) 


; CONTENTS | OF BUS ADDRESS REGISTER (CDA) 
tee) (SP) (CDS) (CDD) (CDC) (CDA) (608) 


: SERRPC, SREGG, STMPO, STMP1, STMP2, STHPS STMPY: $REG7 
-OCTAL VALUES’ 


(PS) 


CONTENTS OF COLUMN COUNT REGISTER (CDC) 
; (PC) (SP) (CDS) (CDD) (Cc (CDA) (CDC) 


‘ SERRPC, SREG6, STMPO, STMP1, STMP2, STMP3, STMP4, SREG7 
-OCTAL VALUES’ 


(PS) 


OFF-LINE BUT CARD READER ERROR 
TATUS lade Sa 


F 
=4 
mea 
aR 
™N 


RRPC, SREGE, $1 
‘OC TAL RR WAL DES’ 


;NO TRANSITION TO wey (BITO3) OCCURRED 
; IN STATUS REGISTER (CDS) 
(PC) (C (CODD) (PS) 


' G6, STMPO, STMPi, SREG7 
OCTAL VALUES’ 








JO? 
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02ZCDB.P ERROR POINTER TABLE SEQ 0087 
bed - ITEM 37 
1 EMG3 ROR BITS SET 
: Hs > (C00) (CDA) (PS) 
T4 shee, Str >STMP 1, 2, STMP3, SREG 
%5 001656 000000 0 
ITEM 4C 
001660 041353 EM36 ; CONTENTS OF STATUS REGISTER #2 (CDD) 
001662 045114 0H7 : (PC) (SP) (CDS) (CODD)  (CDD) (PS) 
901 045350 DT : SERRPC, SREGG, STMPO, STMP1, STMPY, SREG7 
"01 seeges 0 : OCTAL VALUES 
ITEM 41 
00167 1432 EM37 : NO INTERRUPT WITH PROCESSOR AT LEVEL 0 
00 ? yy OH4Y ; (PC) (SP) (CDS)  (CDD) (CDC) (CDA) (PS) 
ile OTY RRPC, SREGS, STMPO, STMP1, STMP2, STMP3, SREG7 
501676 0 ‘ OCTAL VALUES 
; ITEM 42 
001700 04!501 EMYO ;DATA LATE (BIT10) NOT SET IN STATUS 
;REGISTER (COS) 
? 4Y OH4 (PC) (SP) (COS) (CODD) (CDC) (CDA) (PS) 
7 DOTY  SERRPC Gb, STMPO, STMP1, STMP2, STMP3, SREG 
? 0 -OCTAL VALUES’ 
y ;ITEM 43 
001710 O41564 EMY1 ‘OFF-LINE (BIT12) NOT SET IN STATUS 
‘REGISTER (CDS) 
Teta QYeaOe pr gO hoe) eric empl STHP2, SHES, SREG? 
Bite} Bcbe08 i i SERA VALLES’ 
; ITEM 44 
001720 O41646 EM42 OFF-LINE (BIT12) SET IN STATUS REGISTER 
-(CDS) - SHOULDN’T BE 
? 0017 cf DH4 : (PC) (SP) (CDS) (COD) (CDC) (CDA) (PS) 
0017 OT4 : SERRPC, SREGG, STMPO, STMP1, STMP2, STMPS, SREG? | 
0017 0 -OCTAL VALUES 
? - ITEM 45 
001730 (41743 EM43 -PICK CHECK (BIT13) NOT SET IN STATUS 
71 “REGISTER #2 (CODD) 
711 001732 0444S DHY : (PC) (SP) (CDS) (CDD) (CDC) (CDA) (PS) 
712 001734 045306 OTY ‘ SERRPC, SREGG, STMPO, STMP1, STMP2, STMP3, SREG7 





MAINDEC - 11 - OZCDB-B MACY11 27(654) 
ERROR POINTER TABLE 


0ZCDB8.P11 
713 901736 000000 
714 
715 
716 
ote 001740 042032 
4 001742 O444SE 
ra BIR He 
i 
042122 
7 
mie bea 


NSNNNNNNN 


FRIES AaB SS REO 
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ITEM 46 


DT4 
0 


s ITEM 47 


ITEM S3 
EMS1 


DHY 
DOTY 
0 

; ITEM S4 
EMS2 


;OCTAL VALUES 


REGYeTER ae (81742) NOT SET IN STATUS 


(PC) (SP) (CDS) (CODD) (CDC) (CDA) 
: rat , STMPO, STMP1 , STMPe, STM, SREG7 
-OCTAL 


CK (BIT14) SET IN STATUS 

;REGISTER (CDS) - SHOULDN' T BE 

: (PC) (SP) (CDS) (CODD) (CDC) (CDA) 
SREGS, STMPO, STMP1, STMPe, STMP3, SREG7 
-OCTAL VALUES 


{ReGreTeR (cbs) SHOULDN'T RE 


; ) (CDS) (CDD) (COC) (CDA) 
gener sree. , STMPO, STMP1, STMP2, STMPS, SREG7 
CTAL S 


CBs) No PIE eT OF b Be REGISTER 


(PC) (SP) (COS) (COD) (COC) (CODA) 
 SERAPC, STHPD, , STMP1, STMP2, STMPS, SREG7 


; READ Meta eT OF a REGISTER 
; (CDS) 

(PC) (SP) (CDS) (COD) (CDC) (CDA) 
Wey STMPO, STHPI, STMPe, STMP3, $REG7 


 SERRPC 
: OCTAL VALUE 


;HOPPER CHECK (BITle) OF STATUS REGISTER 
-CDS) NOT SET - SHOULD BE 





SEQ 0188 


(PS) 


(PS) 


(PS) 


(PS) 


(PS) 


(PS) 


MAINDEC - 11 - DZCD8-B WMACY11 27(654) 1-JUL-77 08:35 PAGE 17 
OZCDB.P11 OERROR PO POINTER TABLE SEQ 0089 
A a BTM  SERRPC, SREGE STHPD STHPL-STHP2, STH, SREG? si 
Bisbee God000 0 iefaL VALUES’ , 


_ HECBeS" ovBRr‘BLERR uw Haan F TON 

















DH4 : Mery TNE (CDS) (CDD) (CDC) (CDA) (PS) 
OT4 : SERRPC SREG, STNPD STMP1, STMP2, STNPS, SREG7 
3 0 SOCTAL VALUES 
7a ITEM 56 
32 002040 OH3I115 EMSY READ CHECK (BIT14) NOT SET IN STATUS 
: : REGISTER re (CDD) 
iH 44 DH4Y - (PC) (SP) (CDS) (CODD) (CDC) (CDA) (PS) 
OT4 ‘ SERRPC, SREGS, STMPO, STMP1, STMP2, STMP3. SREG7 
aE 000000 0 OCTAL VALUES 
7 BE -ITEM S7 
: 5 ERROR BUT NO 80TH 
ORR REAP (CDS) ecBD) CARB) (CDA) —« (PS) 
OTY : SERRPC SREGB, STHPO, STHPL, ,STMP2, STMP3, SREG7 
: 0 OCTAL VALUE 
} EMS6 -CARD READER ERROR BUT READER NOT OFF-LINE 
iE DH4 : (PC) (SP) (COS) (cpc) (CDA) (PS) 
3 OT4 ‘ SERRPC, SREGG, STMPO, STMP1, STMP2, STMP3, SREG7 
tf 0 SOCTAL VALUES 
3¢ ITEM 6i 
394 002070 043313 EMS7 “END OF FILE ERROR (BIT13) OF STATUS 
105 “REGISTER (CDS) 
: ef sdb, srs0sarl tire, Sites. sekae” 
30 0 : OCTAL vaLueS” 
i - ITEM 62 
ite 043376 EMBO DATA ERROR (BIT11) OF STATUS REGISTER (COS) 
31 NH4SE DH4Y : (PC) (SP) (CDS) (CDD) (CDC) (CDA) (PS) 
18 N45 306 OTY : SERRPC EG, \STNPO, STMP1, STMP2, STMP3, SREG7 
1 SO00DL A SOCTAL ¥ 
+ - ITEM &3 
B18 002110 o4s4s2 EM6 1 ;DATA LATE ERROR ERROR (BIT1O) OF STATUS 
GISTER (CDS) 


si hi 11 - OPE OR POINTER TAGLE 
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s ITEM 66 
EMES 
Br 
0 


: ITEM 67 


ITEM 70 


Mo 


- 


f 


senirc shee, STHPO, $rmpl Step2, STHPS, SREGT 


; NON-EXTSTANT a ih —— (BITOS) OF 
-STATUS REGISTER (CDS 


SERRE srece a: Ca STHP3, SREG 


OCTAL VALUES’ 


a 


iD BON eT Dare OULD OF pT erus REGISTER 


shite Eo, STHPD: Soe bee, SFRE3, sREG? 


sSHOULD BE ADDRESSING BINARY DECK - 


ee ge 6 te eS, wl 


;CONTENTS OF Waly. pecroren (CDS) 
; INCORRECT - 


: (PC) (PS) 
SEnmPC, SRECE,S “eae STHPL. COREG? 


; ODD ADDRESS CAUSED A TRAP IN 


(PC) y (eps) (CDD) (coc) —_¢cpa) 
| SERRPC Cb, |STMPO, STMP1, STNP2, STMP3, SREG? 
-OCTAL VAL 


SEQ 0090 
(PS) 


(PS) 


(PS) 


(PS) 


(PS) 





aw J 
NO é 
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0ZCOB.P11 LOGIC FUNCTION TESTS SEQ 0091 






BEGIN: 










SSCNTAG, R& s FURST LOCATION TO BE CLEARED 
MEMORY LOCATION 


! _ ; LOOP ‘BACK IF NO 
Sh arrvec!| MAF toh Pk SUN for 
ene 


SP dere FOR ERROR ROUTINE 


TRAP VECTOR FOR TRAP CALLS 
se (iver 7 
v Tia FAILURE VECTOR 


T 
ree ’ a Pee 1 ea 
0 


seeerue 





7 
TRN HA ° Sal 
C DO A 
of ; ;DUMMY PS 
S64S,-(SP) oe PC 
55 TRY THE RTT 
SRTT, SRTRN ::RTT IS LEGAL--SET SRTRN TO A RTT 


665 
sree, aeresvet ‘Gare CATCHER cudiaees 
8. INTIAL IZE ba LOOP ADDRESS FOR SCOPE 
aye (3) 
ae 

BRANCH IF No sie ie BCCURS 


SUR 
DISPLAY’ POINT " DISPLAY REG 
ia 4 RESTORE ST One 31 ones 


(RETURN POINT FOR THIS 
SECTION ON FOR POWER FAILURE RETURN 
PC eptiat INITIALIZE POINTERS AND FLAGS 
ST FOR MONIT 


B SESS RSs ee Sete TSC SSeS SeSSe CSS SeM eas 


a aan 
BNE IN ! : MONITOR IS IN CONTROL 

TYPE, STMES sTYPE MAINDEC TITLE & REV. LEVEL 
TYPE, STADOR “TYPE STARTING ADDRESSES MESSAGE 
TYPE, CRLF-3 

TYPE, MSG31 -USER IS TO SET SR SWITCHES 

Mig t MSGe sHIT CONTINUE 


ee eee 





BOS 
SSUES; 1 ~ 2008-8 Et efton esis $£0 0092 





0G Ts™ 


(~—" 





pistes — 











raf 10 O FINISH 





RESTRT: TS 
NOTRP: 
| 1 Pe Ons STack 
mi TE “ENTERING LOGIC TESTS” 
avo ot cinta SSE 
TRAPX: id INDICA o.ihsticTION Test ihe iboal TESTS” 
pet TI ET FINISH Sopne 
176332 ; CHE 
ncn IF SET TO CLEAR TRACE BIT 
Ps ON STACK 
PUT STACK 
64S: 
. ELELERLERESRERELALER EAA RAARE RRA RAL ARSE LED SEERARRRKRRARELARLAAEREHLES 
-4TEST 1 TEST FOR INIT. OF ALL REGISTERS 
+ SLKSKERKELERSERRRSSAASRRAELER REKKKELEERRERESARERLRERA RAR AA ARRAKE 
TST1: SCOPE 
J . PC, CKOFFL as OFF-LINE SET 
oP #200, acos StATUS REGISTER BIT 7 SET 
BEROR + — TE TATUS REGISTER NOT CORRECTLY INITIALIZED 
1S: TST acnc CHECK FOR COLUMN COUNT CLEARED 
BEQ es -BR IF OK 
ERROR +2 COLUMN COUNT NOT CLEARED BY INIT 
23: TST acoA ;CHECK FOR BUS ADORESS CLEARED 
BEQ 3$ -BR IF 
ERROR +3 -BUS ADDRESS NOT CLEARED BY INIT 
176360 38: TST ICDDB TEST BITIS OF STA REGISTER #2 
BPL ug j BRANCH IF NOT NDICATING 
107777 176350 CMP #107777, aCDDB -15 NIENTS OF ATUS JREGISTER #2 
BEQ S$ IF OK! 
107777 001210 MOV #107777, STMPY CT CONTENTS OF ’CDD’ FOR 
ERROR +40 Ee ee F * STATUS REGISTER 
: #2 NOT = 1 


BR S$ br TO NEXT 


007777 17632 4S: CMP  #007777,aCDDB T TS CONTENTS. OF fF SU SME 


CORRECT FOR NO 


CO8 
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52008 P11 ROCYAL 676652) ob AT RecIsteRs _— 
12 001404 BEQ cs BRANCH IF OK! 
14 O1 007777 001210 MOV #007777, STMP4 ; CORRECT S OF 'CDD’ FOR 
002722 104040 ERROR +40 CONTENTS OF -COOB” STATUS REGISTER 
ooe7ey SS: ! asia 
3/* . LELERLHERSESERAREEE 
98C S*TEST 2 TEST READ/WRITE OF STATUS REGISTER 
3 « EELEEELELLEE EE ELEES ELSES RARER ERARA EEA LE SE RERERERE RRERHKERAAERAERR HHL AES 
38 tsT2: SCOPE 
38. imate Re 90" Be eet tothe 6 a5 8 THE STATUS REGISTER SHOULD BE 
30! 77376, aCOS SET ALL ITS BUT 0 AND 8 
38 CHP a3 #362, ‘'aCDS {ONLY 1,.4,5,6, AND 7 SHOULD BE SET 
38 ERROR +4 ’ {STATUS REGISTER DIDN’T CONTAIN 362 
28 BR TST3 : BRANCH 
29) vg: ACREARING.SIATUS REGISTER SHOULD CLEAR BITS, 14,5, AND 6 
39: CHP #200, acDs tEHECK FOR FOR on ALL "sits CLEAR BUT 7 
39° ERROR +4 -STATUS REGISTER DIDN’T CONTAIN 200 
39. -SETTING ALL BITS SHOULD DO A POWER CLEAR 
456 177777 2S: HOV 8177777, aCDS | ;SET ALL BITS OF THE STATUS REGISTER 
39 000200 CHP #200, acDS Crk FOR ALL SITS CLEAR BUT 7 
ERROR +4 STATUS REGISTER DIDN’T CONTAIN 200 





3S: 

5 SNE SS SE 2 A AE EE ESE ES EEE EE EE 
+ 3 TEST READ/ERI COLUMN T 

: LEEK EE REEE LEELA ERE SEES E EELS REEL REALE A AKER LERE AREER AAA A EEE EEE 


TST3 
MOV 4177777, L 
CMP urrirriaeoe test 76 see IF IT CAN BE READ 
-CDCC FAILED TO READ/WRITE 


1§: CMP #200, aCDS sCHECK STATUS REG 





BEO es : IF OK 

ERROR +4 sSTATUS REG CHANGED 
es: BIS 8400,  9@CDS ;D0 A POWER CLEAR 

TST acoc ‘CHECK FOR COLUMN COUNT CLEARED 

BEQ 3$ ;BRANCH IF OK 

ERROR +6 sCOLUMN COUNT NOT CLEARED BY POWER CLEAR 
3$ CMP #200,  aCDS ;CHECK STATUS REG 

BEG 4§ ; F OK 


I 
;STATUS REG CHANGED 





DO8 
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DZCDB.P11 TEST READ/WRITE OF SUS ADDRESS REGISTER SEQ 0094 
5 SESE SESE SEE EEE EERE EEE EEE AEKRHKRRSHSRALARRELRL EER 
-#TEST 4 TEST READ/WRITE OF BUS ADDRESS REGISTER 
. REKLRHRESERLARRAERERSAAERARE RARER LES 
TST4: SCOPE 
177777 MOV 8177777, ee? fo. ¥ 
177777 CHP 817777, F IT CAN BE READ 
ERROR +7 CDRA FAILED TO READ/WRITE 
1S: CHP #200, acDS §_; CHECK STATUS REG 
+4 , “STATUS REG CHANGED 
2s: BIS #400, aCDS ;00 A POWER CLEAR 
TST acDA “CHECK FOR BUS ADDRESS CLEARED 
BEQ 3$ “BRANCH IF OK 
ERROR +10 *BUS ADDRESS NOT CLEARED BY POWER CLEAR 
3S: CMP #200, aCDS ;CHECK STATUS REG 
BEQ 4§ “BRANCH IF OK 
ERROR +4 “STATUS REG CHANGED 


4$: 
5 3 ES EE SE EAE EE EE 
ie READY TO CLEAR 
© 6-3-3 3-3-3 36-36-3633 SS 2 9 A EE 


ists: 
BIT O SHOULD ALR ALWAYS READ eciert See ot Ws: ane 


ee ee ae ee et ee ee ee et ee ee ee ee ee ee ee eh ee ee eee 
~ — = . + o>, >; 


Hoy ol Se Be COLUMN COUNT TO READ 1 COLUMN 
i THE rout Sune Reece EOATUAL ENT OF OF “MOV PS, PROC™ 
MOV 4 or SP) cave CURRENT TRAP VECTOR 
000034 MOV #64, 34 :: SETUP NEW TRAP VECTOT 
TRAP ::PUSH OLD PSW AN PCON STACK 
900006 64$:  #$MOV 2(SP) (SP) : 
Mov #65S, (SP) stil ond REPLACE OLD PC WITH NEW 
65$: MOV (SP)+,34 - RESTORE OLD TRAP VECTOR 
MOV (SP)+' PROC 
MOV ~{SP) PUT NEW PS ON STACK 
MOV  #66$,-(S5P) ::PUT NEW PC ON STACK 
i RTI :: POP NEW PC AND PS 
CLR COUNT INTIAL Ze 8 COUNTER 
TSTB 3s aS ‘CHECK FOR REO ANG ROLLE R READY CLEARED 
OOPS : BRANCH 
ERROR +11 CONTROLLER READY DIDN’T CLEAR 
000001 LOOPS: BIT #1, acDS §- ; CHECK BIT O 
BEQ 1$ ‘BRANCH IF NOT SET 


ERROR +le ;BIT 0 READ AS A ONE 
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1081 BR TST& -BRANCH AFTER FAILURE 
108 001250 ° 1S: INC COUNT : WAIT ABOUT 
i Ry babes 

: 001256 MOV -(SP) ::PUT NEW PS ON STACK 
108 003252 MOV #64S, -(SP) ;;PUT_NEW PC ON | STACK 
10 oi RTI :: POP NEW PC AND PS 
106 TSTB  =-_:« ACS “CHECK CONTROLLER READY 
te? ay sCONTINE JF oRBtLER READY DIDN’T SET WITHIN 1 SEC 
| as: FSO Hons 
te BS “un ERROR BIT SET 
3 eR - TSTb : 

i 177577 3S: BIT #177577,@CDS | ;CHECK FOR ANY OTHER BITS 
109 BEG 4 BRANCH IF OK 
| ERROR +15 EXTRA BIT(S) SET 
10% 4S: 
t 2 EHHHEHNEHBHHHH HEHEHE HII EEESEAE EEE EEE EE 

¥TEST 6 TEST BIT2 TO BE CLE READ 

' ; —————— 
11 -IT SHOULD IN NOT SET 
il ‘THIS SHOULD HAPPEN WITHIN ABOUT 1 SECOND 
110€ 025772 ISR PC. CKOFFI. -CHECK FOR OFF-LINE SET 
i 75 i ES cue TI ur clin fo eto 20 coLunes 
1 . hasuie HOV G,acDA Fa UP SO oneSS 
iF oo0004 BIT #4 , ACOs HECK A UOPPER EMPTY’ 
11 ERROR +16 HOPPER EMPTY SET 
il 001250 1S: CLR COUNT SET UP WAIT COUNTER 
i i THE FOLLOWING REPRESENTS EQUIVALENT OF “MOV PS,PROC” 
1 MOV wt ) 4 CURRENT TRAP VECTOR 
ll eet 000034 MOV 3,4 Ef + SP Yop NEW TRAP VECTOT 
l TRAP : PUSH OLD PSW AN PCON STACK 
l 999002 000006 64S: ## MOV 2(SP),6(SP) 7 
l MOV #65S, (SP) *REPLACE OLD PC WITH NEW 
1 RTI RESTORE’ PSH 
i 65$: MOV (SP)+, 34 RESTORE OLD TRAF VECTOR 
l 1 MOV (SP )4 ’ PROC 
l MOV (SP) . sPUT me PS ON STACK 
l 12 MOV Woes, - (SP ::PUT NEW PC ON STACK 
ee RTI :: POP NEW PC AND PS 
1 LOOP6A: TSTB  acods -CHECK READY 
1 BMI LOOPEB :BRANCH IF READY 
l 001250 DEC COUNT WAIT ABOUT 1 SEC. 
1 BNE LOOPEA 
1 ERROR +13 :READING A CARD DIDN’T SET READY 
l BR 1S17 
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02C08.P11 Té TEST BIT2 TO BE CLEAR AFTER CARD READ 
LOOP6B: 
x 001256 MOV PROC, -(SP) :;PUT NEW PS ON ST 
003442 MOV #64S, -(SP) ::PUT NEW PC ON STACK 
$ - RTI :: POP NEW PC PS 
LOOP6: TSTB  acDSs : CHECK CONTROLLER READY 
4 BMI b :BRANCH I Foe 
d ERROR wd ' sRESTORING STATUS RESET READY 
4y DONE6: TST acDs ;CHECK ERROR BIT 15 
.: 1$ ‘BRANCH IF OK 
4 +14 -ERROR BIT 15 WAS SET 
1$: 
i ; HREEAREREREEEEREEAEREAEE ESSE T EDO CONTROLLER REPOY 


e574 
003806 






JeazZan— 


oe be be Be be fe 8 + Fe ba Pe ee 
ee ae ae eee 
A A APO: RA ABE LOLS AEA ER LO AO NG OE LN A A LIE IEE AS SS OR A A A A th a 





-— & b— oe be Oe 





001214 


000034 


000034 


: ERRUPT CONT Y 
ak og on gyre 


64S: 


65S: 


665: 


67$: 


68S: 


698: 


ratte Beenie Pas EOP TE “BIS #340,PS” 


4 PSP) cave CURRENT TRAP VECTOR 
#64, 34 ::SETUP NEW TRAP VECTOT 
;;PUSH OLD PSW AN PCON STACK 


dR 

MOV 

MOV 

TRAP 

MOV 2($P) &(SP) 3 

Mov s, (SP) -REPLACE OLD PC WITH NEW 
MOV 

MOV 


. « RESTORE’ PSI 
(SP)+, RESTORE OLD TRAP VECTOR 
(SP)+’ STMPE 
BIS MPG 
my SUS) PUT Aes OSU 
m : OP Se BC AND 


FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS, 2(ADINT)” 
cave CURRENT TRAP VECTOR 
Hg NEW TRAP VECTOT 

>PUSH OLD PSW AN PCON STACK 
2(SP) (SP) - 

REPLACE OLD PC WITH NEW 

| RESTORE” PS 
7 REGTORE OLD TRAP VECTOR 
NG REPRESENTS THE snereaie OF “BIC #340,PS” 
t cove CURRENT TRAP VECTOR 


;;SETUP NEW TRAP VEC 
-:PUSH OLD PSW AN PCON STACK 


2(SP),6(SP) ss 

#70S, (SP) sREPLACE OLD PC WITH NEW 
RTI ; ;RESTORE’ PSid 
MOV (SP)+,34 RESTORE OLD TRAP VECTOR 


SEQ 0096 


GOS 
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gore MOV (SP)+ STHPE 
y wa otc no PUT ST 
pete MOV is. sive, (SF) - = PUT on ST 
on RTI -: POP NEW PC AND PS 
177741 "MOV #-31., acDC ;SET UP COLUMN CO COUNT TO READ 31 COLUMNS 
ety my Sees. te 1S InTeeArT ENR, ero 
1S: i518 aco : WAIT RTERRUPT ENPGL READY 
THE FOLLOWING REPRESENTS THE EQUI “MOV 2(ADINT),PS” 
909092 Mov S(ADINT), -(SP) > PUT ar yeteN PACK 
30 MOV #72$, -(SP) + PUT NeW PC On STACK 
pm RTI :: POP NEW 
000100 a. #100, acDS ;CLEAR TET ENABLE 
+ nee NO INTERRUPT OCCURRED 
TINT?: TSTB  acDS » CHECK mises READY 
BM 1$ “BRANCH IF SET LER 
E +23 > CON READY NOT SET 
1S: CMP (SP)+, (SP)+  ;RESTORE STACK POINTER 
TST acs MAKE SURE NO ERROR OCCURRED 
i ERROR +14 sBIT 15 15 Was SET 
900232 CONT7: MOV ree BADINT Pett INTERRUPT Return TURN ADDRESS 
32 CLR a#23e TO CAUSE A HALT IF AN INTERRUPT OCCURS 
epee nerereereereeereerunnenr ae neeneneeneveneenenserneaes 
‘TEST 10 TEST NO INTERRUPT ON CONTROLLER READY & CPU AT LEVEL 7 
We ee 
744 SR INIT __; INITIALIZE 
150 MOV tint JADINT ;SETUP RETURN 
THE FOL . LOWING NG REPRESENTS THE EQUIVALENT OF “BIS #340,PS” 
000034 MOV 34 isp) Save CURRENT TRAP VECTOR 
004020 000034 MOV #648, 34 ‘SETUP NEW TRAP VECTOT 
TRAP BUSH OLD PSW AN ON STACK 
000006 64S: MOV 2(SP),6(SP) 7 
004034 MOV #65S, (SP) REPLACE OLD PC WITH NEW 
RTI : RESTORE PS 
65S: MOV (SP)+,34 RESTORE OLD TRAP VECTOR 
1214 MOV (SP)+’ STMPE 
001214 BIS #340, STMPE 
MOV STMPb, -(SP) i PUT NEW PS ON STACK 
4 MOV 866S, -(SP) =PUT NEW PC ON STACK 
RTI :: POP NEW PC AND PS 


66S: 
Ny FOLLOMING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 


OOso4 C $i 
13746 000034 NOV aM, (SP) ;;SAVE CURRENT TRAP VECTOR 
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OZC08.P11 T10 TEST NO INTERRUPT ON CONTROLLER READY & CPU AT LEVEL 7 SEQ 0098 


1243 004072 012737 OO04102 O00034 #67$, 34 ;;SETUP NEW TRAP VECTOT 


MOV 
TRAP ::PUSH OLD PSW AN PCON STACK 
ppnoe 000006 67%: (SP) &(SP) He 
' Nov , (SP) ioe nad RERUACE OLD PC WITH NEW 
{ 68S: MOV (SP)+, 34 er = RECTORE OLD TRAP VECTOR 
t { 14 03 NOY ieee SET UP COUNT TO READ 61 COLUMNS 
1271 pisaie MOV HBUFBEG,SCDA ;SET UP ADDRESS 

a 13 101 MOV #101, aCDS | ;SET INTERRUPT ENABLE AND READ 
eg Doie 105713 is: STB aS ;WAIT FOR CONTROLLER READY 
3Ec tue BR 10G0 - CONTINUE IF NO INTERRUPT OCCURRED 
56 TINT1O: ERROR +21 ; OCCURRED 
+4 veniie CHP (SP)+, (SP)+ ;RESTORE ST INTER 
66 1 12712 990232 "MOV #232, JADINT ‘CHANGE INTERRUPT RETURN ADDRESS 
aC 1 37 00023 CLR aee3e TO CAUSE A HALT IF AN INTERRUPT OCCURS 





FIND THE LEVEL AT WHICH AN INTERRUPT OCCURS 
;PRINT OUT A STATING THIS IF IT IS OTHER THAN THE STANDARD 
(LEVEL 6) MAKE QIN THAT IT AT THIS LEVEL 
‘THE MESSAGE STATING THE LEVEL IS PRINTED ONLY ONCE, AND THE PROGRAM MUST 
‘BE STARTED OVER AT LOCATION 200 FOR IT TO BE PRINTED AGAIN 


: HEHEHE EEE EERE EEE EEE EE EEE REEL E RHEE REELS 


;*¥TEST 11 TEST FOR AN IN ONL 
Pe 


025744 SR PC INIT _; INITIALIZE 
004556 MOV #TINT11.@ADINT :SETUP RETURN ADDRESS 
i THE FOLLOWING REPRESENTS THE EQUIVALENT OF "BIS #340,PS” 
y | 


sgt et 
<= 


3 


900034 M0 34, -(SP) :: SAVE CURRENT TRAP VECTOR 
216 000034 MOV 64S, 34 :: SETUP NEW TRAP VECTOT 
4 TRAP ::PUSH OLD PSW AN PCON STACK 

3 go0g92 000006 64S: MOV 2(SP) .6(SP) - 
BC 232 MOV #655, (SP) - :REPLACE OLD PC WITH NEW 
4°) RTI . > RESTORE PSW 
28 655: MOV (SP)+,34 : RESTORE OLD TRAP VECTOR 
4° 14 MOV (SP)+:STMPG 
: 001214 BIS #340, STMPE 
425 4 MOV STMP6, -(SP) ::PUT NEW PS ON STACK 
a) ebe MOV #66S, -(SP) --PUT NEW PC ON STACK 
4°) sal RTI :: POP NEW PC AND PS 
++ 4 
285 j THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 
+ a _ . » 
+) 000034 MOV 34, -(SP) :'SAVE CURRENT TRAP VECTOR 
a3 004300 ofc034 MOV #675, 34 ;:SETUP NEW TRAP VECTOT 
¥ TRAP ::PUSH OLD PSW AN PCON STACK 
BC onoo02 o0n006 67%: MOV 2(SP) .6(SP) - 

: #6BS, (SP) - ;REPLACE OLD PC WITH NEM 


= be me fe fe Be Os Fe ee Be 8 8 —— 





: RESTORE PSW 


Dit 









eg = 33 - _— MACY11 27(654) 1-JUL-77 08:39 PAGE 27 
02¢938.P Thi TEST FOR AN INTERRUPT ON LEVEL 7 SEQ 0099 





1 68S: MOV (SP)+,34 ::RESTORE OLD TRAP VECTOR 
1 MOV (SP)+’ 2(ADINT) 
ite FOLLOW NG REPRESENTS: THE EQUIVALENT OF “BIC #340,PS” 
1 MOV 34.-(SP) ::SAVE CURRENT TRAP VECTOR 
an TRAP a69S, 34 Ha, a TRAE NY BEON. STACK 
1 O00006 69%: MOV 2(SP),6(SP) + 
1 HOV #705, (SP) ante” ; REPLACE OLD PC WITH NEW 
{ 70S: NOV (SP)+, 34 oe * RESTORE OLD TRAP VECTOR 
001214 BIC #340, STMPE 
MOV §  $TMP6,-(SP) » PUT et re aN 
HOV #71$, -(SP) 14 ON i: cK 
131 71$: 
i Bo le, i 
34° -(SP) : SAVE CURRENT T TRAP VECTOR 
i connate ES eta hb Pan PEIN STAC 
o00006 72S: MOV 2(SP) 6(SP) ee 
NOV #723%, (SP) aie ond Bea * OLD PC WITH NEW 
73S: NOV (SP)+, 34 “ - RESTORE OLD TRAP VECTOR 
1 001214 BIS #300 sTHPe 
MOV STMP6, -(SP) -:PUT NEW PS ON STACK 
#745, -(SP) ::PUT NEW PC ON STACK 
ai RTI :: POP NEW PC 
| Moy 8-80. ace SET UP COLUKN COUNT TO READ 80 COLUMNS 
MOV #101, ‘@CDS i eET INTERRUPT ENABLE AND READ 
| 1S: TSTB pS :WAIT FOR CONTROLLER READY 
THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV 2(ADINT),PS” 
Mov S(ADINT).-(SP) ;;PUT NE PS ON STACK 
MOV i758, -(SP) : PUT ON "STACK 
iste RTI :: POP NEW PC PS 
1 "ay acDs DISABLE INTERRUPTS 
CUR as scieauead eT pe a NTERROP ii OCCURS 
sf uae TEP Prev N INTER 
l BEQ TSTle “BRANCH I 
l 100007 CHP INTELG, #100007 ;CHECK PREVIOUS LEVEL 
ERROR , ; BRA INTERRUPT ALREADY OCCURRED AT LVL 7 OR HIGHER 
l TINTL1: TSTB acDS “MAKE SURE CONTROLLER READY IS SET 
1 BMI 1§ -BRANCH IF SET 
1 ERROR +23 CONTROLLER READY WASN’T SET 
l 18: CLR acDs DISABLE FURTHER INTERRUPTS 


— = 





JO8 
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OZCOB. P11 TEST FOR AN INTERRUPT ON LEVEL 7 SEQ 0100 
ie oog232 MOV #232. @ADINT ;CHANGE INTERRUPT RETURN ADORESS 
Tae —_ CR MBSE spy, AOE sat Ll oar SCOURS 
1 001252 TST INTFLC CHECK FOR PREVIOUS FLAG 
Ss } le BMI SET7 FLAG SET 
sc 100007 001252 MOV #100007, INTFLG ; AFT FLAG AND LEVEL 
13 404400 031741 TYPE, MSG4 “PRINT MESSAGE "THE INTERRUPT LEVEL WAS” 
' SE 000007 MOV 87, -(SP) 
Fy l TYPOS 
1366 BYTE 1 
136 “BYTE O 
13 BR TST12 
136- 001252 100007 SET7: CMP INTFL, #100007 ;CHECK PREVIOUS LEVEL 
it t : INTERRUPT ALREADY OCCURRED AT A LOWER LEVEL 
1 ie ee ene ire ettirrereh 
136 -¥TEST 12 TEST FOR AN T 
1 ti > LEASE SELLE AEAE REEL EEREALE AERA RREREAERRE RE RLAE RE REL ERE LL LENE 
70 p87 SR INIT - INITIALIZE 
34 MOV Pt tnTi2 QADINT “SETUP RETURN ADDRESS 
| je FOLLOWING REPRESENTS THE EQUIVALENT OF "BIS #340,PS” 
000034 MOV 34. -(SP) cave CURRENT TRAP VECTOR 
1 004674 o00034 MOV #64$, 34 -: SETUP NEW TRAP VECTOT 
7 TRAP 5 Pam OLD PSW AN PCON STACK 
ith 10 _— NOV oS top) OLD PC WITH NEI! 
: 4 
kia RTI . 5 esrond BER LACE 
BC 655: MOV (SP)+,34 -RESTORE OLD TRAP VECTOi’ 
8 | 14 MOV (SP)+. STMP6 
[:F 001214 BIS 130, STR 
8. 1214 MOV 5 SP) PUT NEW PS ON STACK 
[ MOV #65$,-(SP) ;jPUT NEW PC ON | STACK 
18° sa RTI :: POP NEW PC AND PS 
187 i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS, 2(ADINT)” 
13 990034 MOV § 34,-(SP) i SONE CURRENT TRAP VECTOR 
3C 000034 MOV #675, 34 ‘SETUP NEW TRAP VECTOT 
¢ TRAP ::PUSH OLD PSW AN PCON STACK 
9¢ 900092 000006 67%: MOV 2(SP) .6(SP) - 
19: MOV #685, (SP) -REPLACE OLD PC WITH NEW 
1 RTI ; ;RESTORE PSW 
1a on003% 68S: MOV ($P)+,34 -sRESTORE OLD TRAP VECTOR 
ye, MOV (SP)+' 2(ADIN 
13a. j THE FOLLOWING REPRESENTS THE en aa OF “BIC #340,PS” 
#y vt 
198 900034 : MOV 34. -(SP) + cave CURRENT TRAP VECTOR 
oC 00.034 MOV #69, 34 :: SETUP NEW TRAP VECTOT 
14C TRAP ; ;PUSH OLD PSW AN PCON STACK 
; Je p00006 000006 69%: MOV 2(SP) 6 (SP) . 3 
k MOV $, (SP) sREPLACE OLD PC WITH NEW 
1404 . «RESTORE: PS 





an é - ii - oe 
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715: 


753: 


TINTle: 


1$: 


_ ngage 


2 
~ 
and 


Gee 


im 
wm 


THE FOL 
HOV 


LEVEL 6 


(SP)+,34 
ng Shee, 


e718 2(SP). 


4 (SP) 
$735.34 


Go3s tee) 


(SP)+,34 
(SP)+ STNPE 
sTHPG, ~(SP) 
#74S, -(SP) 


#-80., acdc 
#BUFBEG, ace 


SiR DS 
1$ 
LOWING REPRE 
2(ADINT) .-(SP) 
4755, -(SP) 

#2 JADINT 
sa23 

NTFLG 


ST13 

INTFLG, #100006 

can TST1i3 
OR +22 


TST13 
acs 


a 
(SP)+ 
INTFLG 


#6, *(SP) 
i 








KO8 


; RESTORE OLD TRAP VECTOR 


pa OLD PC WITH NEW 
* RESTORE OLD TRAP 
;;PUT NEW PS ON STACK 
ss PUT NEW PC ON STACK 
POP NEW PC AND PS 
SFT UP COLUMN COUNT TO READ 80 COLUMNS 


ENABLE AND READ 
ity FOR CONTROLLER READY 


ANGE INTERRUPTS 


pe ee LEVEL 
T ALREADY OCCURRED AT LVL 6 OR HIGHER 
i BRAN oun CONTROLLER READY IS SET 
; CONTROLLER READY WASN’T SET 
pisee.e “FURTHER INT 
a tantra 
alo ia Fs 


SET 
#100006, INTFLG ; a FLAG AND LEVEL 
INT MESSAGE “THE INTERRUPT LEVEL WAS” 


se @ADINT 
(SP)+ 








LO8 
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BR TST13 
001252 100006 SET6: CMP NTFLG, #100006 ;CHECK PREVIOUS LEVEL 
i i BPL ST13 


+24 INTERRUPT ALREADY OCCURRED AT A LOWER LEVEL 
SHUSESESESESESESESEERESEERSESSIST® Pere eerste 
TEST 13 TEST FOR AN INTERRUPT ON LEVEL 5 
j SeSRREDRNSEEESERRESESEGRESNSECHESHEEE -SEMeSe AES SE SEE GE EEE EE SEE EE E E 


tST13: 


a 


a rod tee SADINT IP RETURN ADDRESS 


SENTS THE EQUIVALENT OF “BIS #340,PS” 


47 ie pre v5 

ire MOV 34 TSP) “SAVE CURRENT TRAP VECTOR 

4 MOV #645, 34 TSE TOP NEW TRAP VECTOT 

W TRAP nile, hie ::PUSH OLD PSW AN PCON STACK 

ire NOV ces. (Bp ip ‘REPLACE OLD PC WITH NEW 
4 RTI . «RESTORE PSW 

476 MOV (SP)+ Tire -sRESTORE OLD TRAP VECTOR 
476 HOV (SP)+' STMPG 


sig Sits ) - PUT ON STACK 
#665, SB) PUL re Pe On NA SIRCK 


FOLLOWING REPRESENTS, THE EQUIVALENT OF “MOV PS,2(ADINT)” 


at 
x 
+ 
bone 


+ Rae iin 


-(SP) 
34, (SP) SAVE CURRENT NT TRAP VECT CTOR 
: Ha Pi petae PSW AN PCON STACK 
Se Bey OLD PC WITH NEW 
. 5st ‘Ber és 
34 RESTORE OLD TRAP VECTOR 


TS THE EQUIVALENT OF “BIC #340,PS” 
( 3 


oe 
He 
: 
fs 
3 


Be ee 

— > ee ee he ee ee 
= : 

- “+ ; > ; ? Toa 


SEEEEREEr EE Mer Ceeere eae 
ee 


SP) SAVE CURRENT TRAP VECTOR 
a4 SETUP ek NEW TRAP VECTOT 
$3 OLD PS AN PCON STACK 
sei ciee 1ess hy OLD PC WITH NEW 
; . sRESTORE’ sRErLACE 
70S: (SP)+,34 > sRESTORE OLD TRAP VECTOR 
(SP)+ STNPE 
001214 #340, $TMP6 
STMP6, - (SP) -PUT NEW PS ON STACK 
871$,-(SP) tt LIT NEW PC ON 
RTI -: POP NEW PC AND 
718: 
ea ets) bi cove CURRENT TRAP VECTOR 
000034 MOV #725, 34 SETUP NEW TRAP VECTOT 
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512 SBS HPCE come a UCase 
p00006 723: +s 
it 005574 Hoy 873%, (SP) — ; BEPLACE OLD PC WITH NEW 
000034 73S: MOV (SP)+, 34 " -sRESTORE OLD TRAP VECTOR 
5 001214 yt 
1214 MOV =~ (SP) ; PUT NEW PS ON STACK 
005624 HOV #748, -(SP) PT Ne PE He STACK 
I 
. 74S: 
+ TO READ 80 COLUMNS 
iS mY Sec BST UP 
152% 000101 i. "ere #101, | acds ey IN BND READ 
Se / . 
185 ine 
152° THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV 2(ADINT),PS 
-(SP) :;PUT tN Ss 
e ee ty SRN oR ee o8 SR 
c 3 
53. 75S: 
534 CLR -DI INTI: S 
: TURN 
iB CLR a — ; 0 MALT IF AN I T OCCURS 
*} 1252 TST INTEL : FOR A PREVIOUS INTERRUPT 
x - 
53 001252 100005 CHP NTFLG, #100005 s CHECK by LEVEL 
+p BPAOR + : T ALREADY OCCURRED AT LVL S OR HIGHER 
: BR TSTI4 
5 TINT13: TSTB READY IS SET 
i BAL vols ee oa 
ie ERROR +23 Y WASN 
Fs, se Ff ADINT aes Te Ss 
54 $ CLR aie ‘ Bae A HOLT IF AN INTERRUPT OCCURS 
5 (SP)+ + 
ie nies fie oe Ra 
x Biofoos, intruc Fad abt . 
Lee aai7al ana TYPE, nscH ME INTERRUPT LEVEL WAS 
155 MOV #5,-(SP) 
1$55 TYPOS 
ie er i Tsri4 
155° 001252 100005 SETS: CMP INTFLG, #100005 ;CHECK PREVIOUS LEVEL 
18e i PRHOR 424° NTERRUPT ALREADY OCCURRED AT A LOWER LEVEL 
is 3 HEHEHE HEHEHE cosevtenversatesalaneaeanescraeeseesees 
t3P vena i LEST ANASEREREESERESEEAESSEOHEGEES 
ieee 90600 aaa? 025744 we se ;, PC, INIT ; INITIALIZE 





aan - 11 - 02C08-8 
14 


i oe a > + 
a, Pay By Ry By Bi Bey Bn in Bn, Bn 
a) 3 CD -) LIES LEI. 
» +4 


BS eo en DD pion iinie 
a . - + - > > + *s¢ ~ 


= 
ec a a > 


af 
z 
af 
7 
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TEST FOR AN INTERRUPT ON LEVEL 4 


9000; 
— 
fl at 


£ot 


BE Geaes bus 


a= 


a 
tor 


001214 


061214 


001214 





NO8 
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665: 


67§: 


718: 


SE@ 0104 


OTHE routouine AEPResewTé We EQUIVALENT OF “BIS #340, PS” 


i 






MOV USP) t Save CURRENT TRAP VECTOR 
MOV 8645, 34 -:SETUP NEW TRAP VECTOT 
TRAP ;;PUSH OLD PSH AN PCON STACK 
MOV 2(SP).6(SF) 
MOV 8655, (SP) : OLD PC WITH NEW 
RTL ; ;RESTORE’ 
(SP)+,34 RESTORE OLD TRAP VECTOR 
re (SP)+ 
MOV STMP6, -(SP) ; PUT PS ON S 
MOV #66S, -(SP) ; PUT PUT Fe PC n STRCK 
RTI 
i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS, 2(ADINT)” 
34. -(SP) CURRENT OR 
NOY sebs 34 Bi NEW TRAP Ne ECTOT 
TRAP + OLD PSW AN PCON STACK 
NOY se tee OLD PC WITH NEW 
RTT ‘ 5 nesrond i BerLAce 
MOV (SP )+,34 RESTORE OLD TRAP VECTOR 
MOV (SP)+. 2. ADINT) 
j THe FOLLOW ne REPRESENTS THE emenhie OF "BIC #340,PS" 
MOV 34. -(SP) 4 CTOR 
MOV 34, -(5° Rao TEC TOF 
TRAP ; PUSH A PSW AN YBCON STACK 
NOV oe eS OLD PC WITH NEW 
RTI . reson ser LACE 
MOV (SP +34 sRESTORE OLD TRAP VECTOR 
MOV (SP)+’ STMPG 
BIC #340, TMPG 
MOV STMPS, -(SP) - :PUT NE PS ON STACK 
MOV 871$,-(SP) ; PUT PC ON STACK 
RTI :: POP NEW PC AND PS 
CLR -(SP) +s 
: ee a a ok 
TRAP : ii Push ob pana ON STACK 
MOV 2(SP).6(SP) . 
MOV #738, (SP) REPLACE OLD PC WITH NEW 
RTI : -RE Restore’ PSH 
MOV (SP)+,34 -:RESTORE OLD TRAP VECTOR 
MOV (SP + " STMPS 
BIS 40. $TMP6 
HOV sree, -(SP) --PUT NEW PS ON STACK 


74S, ~(SP) :?PUT NEW PC ON STACK 
-: POP NEW PC AND PS 


y 
ar 
bo 


=z 
oe) 
4 





x 











aT Ue fe mores 0 TO OO Coen 
ROY 


+t Foner 2(ADINT) , PS” 





;DISABLE INTERRUPTS 


Ha how 


ALREADY OCCURRED AT LVL 4 OR HIGHER 


aE ARE CIMOLER READY IS SE! 
;BRANCH IF 
READY WASN’T SET 


CLR acos -DI , I S 
MOV 4232, Gee INTER Re : ay ABORESS 
CLR aiese ser A HALT IF AN INTERRUPT OCCURS 
TST INTFLE Gece Fon Prey PREVIOUS FLAG 
BMI SETH 
#i , INTFLG ; get FLA FLAG AND AD LEVEL 


BR TSTl 
SET4: CMP rare #100004 ;CHECK PREVIOUS LEVEL 












SER ESS HS RBIR REG BRS RP . 
tol 
tad 

’ ; 


£. +24 INTERRUPT ALREADY OCCURRED AT A LOWER LEVEL 
sGE HEH HEHHHHEBHEHH HEHE HHEHHHEEt srreverbenrareast EEEELEEEEERERE 

4 S*TEST 15 TEST FOR AN INTERRUPT ON 

P2e iStis: Score LELKAGEERELLS ES AREARERAA EE RLE LAL AAEA LAR HAE KLEE 

+ SCENTIS, BADINT SETUP Re Tun Tere tien URN ADDRESS 

OLLOWING REPRESENTS URN ENT OF BIS #340, PS” 

;: 34, -(SP) CAVE CURRENT TRAP VECTOR 

. #645, 34 BE UUP NEW TRAP VECTOT 

6! ‘PUSH OLD PSW AN PCON STACK 


64S: 2(SP) 6(SP) . 


oe 


65S, (SP) REPLACE OLD PC WITH NEW 
. «RESTORE PSW 

65S: (SP)+,34 - RESTORE OLD TRAP VECTOR 
(SP)+; $TMPE 
#340 
STMP6, -(SP) -PUT NEW PS ON STACK 
#66$, -(SP) SUT NEW PC ON STACK 

RTI :: POP NEW PC AND PS 


—— pF = f= Be PB FP ee a ee ee ee 


SEQ 0105 


CO9 
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B28 Pil ogre WEST bok’ On I ON 3 SEQ 0106 
1675 : 
1676 -THE FOLLOWING REPRESENTS THE ——— OF “MOV PS, 2(ADINT)” 
16 éLR -(SP) 
l MOV 34. -(SP) : : SAVE TRAP VECTOR 
{ MOV #675, 34 Sette SETUP NEM TRAP CTOT 
1 TRAP ; ;PUSH STACK 
1 MOV 2(SP).6(SP) . 
1 MOV #685, (SP) pies OLD PC WITH NEW 
: RTI s RESTORE oe, 
MOV (SP)+,34 STORE OLD TRAP VECTOR 
l MOV (SP)+: 2(ADINT) 
ite FOLLOMIN REPRESENTS THE mane OF “BIC #340,PS" 
MOV 34. -(SP) ss TOR 
t MOV tas (34 SAVE, CURRENT TRAP ERE YD 
TRAP - >PUSH OLD” PSW AN PCON STACK 
rt MOV 2(SP) .6(SP) ” 
. MOV 8708, (SP) sREPLACE OLD PC WITH NEW 
; RTI . «RESTORE’ PSWd 
MOV (SP)+,34 -RESTORE OLD TRAP VECTOR 
16% HOY (SP) +, SNP 
t mG SROASTEES, sour neu os ov stacy 
y MOV #71$,-(SP) | ::PUT NEW PC_ON STACK 
; : RTI -: POP NEW PC AND PS 
Cae tsp) bi cove CURRENT TRAP VECTOR 
: MOV 872S, 34 i PY NEW TRAP VECTOT 
TRAP | :: PUSH OLD PSW AN PCON STACK 
: MOV 2(SP).6(SP) 2 
: MOV #738, (SP) »-REPLACE OLD PC WITH NEW 
RTI : sRESTORE PSH 
706 MOV (St = RESTORE OLD TRAP VECTOR 
MOV d+, 
? BIS 
1? MOV $10), STH. ~(SP) : :PUT NEW PS ON STACK 
? MOV #74S, ~(SP) ;;PUT_NEM PC ON | STACK 
? RTI :: POP NEW PC AND PS 
Mt HOV #-80. : acpc ‘SFT UP COLUMN COUNT TO READ 80 COLUMNS 
io MOV aaly ve sche T UF TERBUP DOP AABL ABLE 640 BND READ 
1? TSTB ©: aCDS WAIT FOR CONTROLLER READ 


1§ 
>THE FOLLOWING eres THE EQUIVALENT OF “MOV 2(ADINT),PS” 


a eee 





l HOV S(ADINT).-(SP) ;;PUT NEW PS ON STACK 

l MOV $75$, -(SP) ::PUT NEW PC ON STACK 

RTI : NEW PC AND PS 

l CLR acDs DISABLE INTERRUPTS 

1 MOV #232,  @ADINT ;CHANGE INTERRUPT RETURN ADORE ORESS 

1 CLR dese ‘TO CAUSE A HALT IF AN I NTERRUP OCCURS 
l TST INTFLG “TEST FOR A PREVIOUS INTE 


DOS 
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TEST FOR AN INTERRUPT ON LEVEL 3 SEQ 0107 

1739 907014 BEQ TSTI6 BRANCH IF NONE 
1 107016 001252 100003 CMP INTELG, 8100003 ;CHECK PREVIOUS LEVEL 
i + sieee! T ALREADY OCCURRED AT LVL 3 OR HIGHER 
1 BR TSTI6 e 
1 TINTIS: TSTB acDS - MAKE SURE READY IS SET 
1 BMI 1$ ‘BRANCH I 
“ ERROR +23 aa ; READY WASN'T SET 
1 MOV rae QADINT ENCE a dle 1 A ORR $s 
1 CLR aeese : TG A HALT IF An I OCCURS 
1 CMP (SP)+. (SP)+ sREST oa 
174 TST INTFLG * CHECK VI AG 
174 o01252 St ee tgo03, INTFLG ;SET FLAG SD LeveL 
t TYPE, necu ¢ set A ee ae INTERRUPT LEVEL WAS” 
1 MOV #3,-(SP) 

TYPOS 
74 BYTE 1 

“BYTE 0 
BR TSTI6 

100003 SET3: CMP INTELG, #100003 ;CHECK PREVIOUS LEVEL 

: +24 INTERRUPT ALREADY OCCURRED AT A LOWER LEVEL 
i HHH HHH HEHE HHH BHEHHBHHEEGHHBHHEHHHHHEHHHHEHHE EEE EEE 
1 TEST 16 TEST FOR AN INTERRUPT ON LEVEL 
' ee 
1 JSR PC aT , INIT : INITIALIZE “ 
A FOLLOWING Pe eT EO it URN ENT OF "BIS #340,PS” 

MOV 34, -(SP) ::SAVE CURRENT TRAP VECTOR 
000034 MOV stag 34 1 hp NEW TRAP +a 
1 TRAP ::PUSH OLD PSW AN PCON STACK 
1 000006 64$: MOV 2(SP) .6(SP) i 
MOV #658, (SP) REPLACE OLD PC WITH NEW 

RTI ; sRESTORE PSW 
1 65$: MOV (SP)+,34 :RESTORE OLD TRAP VECTOR 
1 MOV (SP)+° STMPG 
001214 BIS #340 

MOV STMP6, -(SP) -:PUT NEW PS ON STACK 
177 MOV — #66$,-(SP) ::PUT NEW PC ON STACK 
- RTI :: POP NEW PC AND PS 
17 i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 
a MOV 34. -(SP) ::SAVE CURRENT TRAP VECTOR 
1 000034 MOV #67$, 34 :: SETUP NEW TRAP VECTOT 
l TRAP : PUSH OLD PSW AN PCON STACK 
l 000006 67S: MOV 2(SP) ,6(SP) ee 
1 007246 MOV #68S, (SP) ji REPLACE OLD PC WITH NEW 
l RTI . «RESTORE 
l 000034 68S: MOV (SP)+, 34 ;:RESTORE OLD TRAP VECTOR 
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TEST FOR AN INTERRUPT ON LEVEL 2 
oo0002 MOV (SP)+, 2(ADINT) 
- THE FOLLOWING SENTS THE EQUIVALENT OF “BIC #340,PS" 
000034 cL 34. -(SP) : i cave CURRENT TRAP VECTOR 
007274 000034 MOV #69S, 34 +1 SETUP NEW TRAP VECTOT 
TRAP ; PUSH OLD PSW AN PCON STACK 
oo0002 OO0006 695: MOY 2(SP),6(SP) 
007310 MOV #70S, (SP) sREPLACE OLD PC WITH NEW 
RTI reso Ea 
0093s 70$: MOV (SP)+, 34 STORE OLD TRAP VECTOR 
1214 MOV (SP)+’ STMPE 
001214 BIC 
14 MOV STMP6, -( - PUT NEW PS ON STACK 
MOV #71, -(SP) ::PUT NEW PC ON STACK 
RTI :: POP NEW PC AND PS 
71$: CLR 
000034 MOV 34 0 (SP) CURRENT T TRAP VECTOR 
007356 000034 MOV 34, ve NEW TRAP VECTOT 
TRAP ; {PUSH OLD PSW AN PCON STACK 
go0002 o00006 72S: MOV 2(SP),6(SP) : 
007372 MOV #73S, (SP) REPLACE OLD PC WITH NEW 
RTI . «RESTORE PSid 
000034 73S: MOV (SP)+, 34 - RESTORE OLD TRAP VECTOR 
1214 MOV (SP)+, STMPE 
001214 BIS ia TMPE 
14 MOV STMP6, -(SP) ; PUT NEW PS ON STACK 
bo7422 MOV $74$, -(SP) ::PUT NEW PC ON STACK 
sin RTI :: POP NEW PC AND PS 
177660 MOV #-80., acDC T UP COLUMN COUNT TO READ 80 COLUMNS 
piste my faurate, ea HST a 
1S: TSB aC : tr i ae ay 
“THE FOLLOWING REPRESENTS THE EQUIVALENT _ OF "MOV 2(ADINT),PS” 
g0g00e AOV S(ADINT).-(SP) ;;PUT NEW PS ON STACK 
0074S4 MOV #75$, -(SP) ::PUT NEW PC ON STACK 
ane RTI 7 NEW PC PS 
CLR acps :D See IME INTERRUPT % 
000232 MOV #232,  dADINT URN ADDRESS 
bo0232 CLR F RAE IF IF aN A INTERRUPT OCCURS 
001 is INTEL Test FOR A IOUS INTERRUPT 
001252 100002 CMP INTFLG, #100002 ; CHECK PREVIOUS LEVEL 
BMI TST17 ‘BRANCH IF LOWER 
ERROR 28 INTERRUPT ALREADY OCCURRED AT LVL 2 OR HIGHER 
TINT16: STB acs ; MAKE SURE _ READY IS SET 
ERROR +23 - CONTROLLE R READY WASN'T SET 
1S: CLR ac : DISABLE’ FURTHER INT 
000232 MOV #232,  @ADINT :CHANGE INTERRUPT RETURN ADDRESS 
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ON LEVEL 2 


TEST FOR AN INTERRUPT 
000232 
001252 


ion 0012Se 
oo000e 


O01eS2 100002 SETe: 


: TEST 


CLR 


CMP 
TST 
BMI 


MOV 
TYPE, 
MOV 
TYPOS 
ya: 


CMP 


a#232 TO CAUSE A HALT IF_AN INTERRUPT OCCURS 
(SP)+, (SP)+ ;RESTORE STACK POINTER 

INTFLG ; CHECK FOR PREVIOUS FLAG 

SET2 IF FLAG 

#100002, INTFLG ; SET FLAG AND LEVEL 

MSG4 PRINT MESSAGE “THE INTERRUPT LEVEL WAS” 
#2,-(SP) 

1 

0 

TST17 

INTFLG, #100002 ;CHECK PREVIOUS LEVEL 


SEQ 0109 


T ALREADY OCCURRED AT A LOWER LEVEL 
seupaueaneabuanananeneeneseeneseegearensiaeantunenenteneaneseeas 


TEST F 


OR 
© 36-3 36-36 6-366 36-36 J 3G SE SESE SE SE AE SE SE Ae AE SE SE SE AE SE SE SE SH a a a EE 


+ST17: 


cig 000006 64S: 


655: 
14 : 
001214 
ped 
007672 
66S: 
000034 
007710 000034 
ooo0002 OO000E 678 
007724 
000034 68S: 
000002 
000034 
0077Se 000034 
ouo0co2 O0000E 695% 
007766 
000034 70S: 


INIT ; INITIALIZE 


MOV STtnti7 JADINT :SETUP RETURN ADDRES 

i THE FOLLC OWING REPRESENTS THE EQUIVALENT OF ’ “BIS #340, PS” 
MOV 34. -(SP) tt cove CURRENT TRAP VECTOR 

MOV #695, 34 :: SETUP NEW TRAP VECTOT 

TRAP ;;PUSH OLD PSW AN PCON STACK 

MOV 2(SP).6(SP) + 

MOV 65S, (SP) --REPLACE OLD PC WITH NEW 
RTI s RESTORE FM 

MOV (SP)+,34 “RESTORE OLD TRAP VECTOR 
MOV (SP)+' STMPG 

BIS #340, § 

MOV STMPb, - (SP) ::PUT NEW PS ON STACK 

HOV #66S, -(SP) Pur NEW PC ON STACK 

RTI POP NEW PC AND PS 


: THE FOULceas REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 


&LR 

MOV 34. -(SP) t cave CURRENT TRAP VECTOR 

MOV #675, 34 SETUP NEW TRAP VECTOT 

TRAP ‘PUSH OLD PSW AN PCON STACK 

MOV 2(SP).6(SP) 7 

MOV #68S, (SP) ‘REPLACE OLD PC WITH NEW 

RTI | RESTORE’ PS 

MOV (SP)+, 34 RESTORE OLD TRAP VECTOR 
MOV (SP)+’ 2(ADINT) 

i THE FOLLOWING REPRESENTS THE inteiiinian OF “BIC #340,PS” 

MOV 34. -(SP) tt cave CURRENT TRAP VECTOR 

MOV #69$, 34 fay NEW TRAP VECTOT 

TRAP ‘PUSH OLD PSW AN PCON STACK 

MOV 2(SP),6(SP) . 

MOV #70$, (SP) ; REPLACE OLD PC WITH NEW 

RTI . s RESTORE’ PSU 

MOV (SP)+,34 ::RESTORE OLD TRAP VECTOR 


es Bi = {i - <j: ai 
0ZCOB .P 
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TEST FOR AN INTERRUPT ON LEVEL 1 


ppos40 001214 


p10016 


001214 


0012Se 


-~ 


a 
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71S: 


723: 


738: 


74S: 


1S: 


755: 


TINT17: 


1S: 


SEQ 0110 


HOV 0, STMPG 

MOV TMP6, -(SP) : sPUT ON ST 

MOV ist ) ; PUT NEW be ON CORK 

RTI :: POP NEW PC AND PS 

CLR -(SP) s 

MOV 34. -(SP) ;§ SAVE CURRENT TRAP VECTOR 

MOV #72, 34 Be TUP NEW TRAP VECTOT 

TRAP ‘PUSH OLD PSW AN PCON STACK 

MOV 2(SP).6(SP) . 

MOV 73S, (SP) -REPLACE OLD PC WITH NEW 

RTI . :RESTORE’ PSH 

MOV (SP)+, 34 RESTORE OLD TRAP VECTOR 

MOV (SP)+) STMP6 

BIS #000, $TMPG 

MOV STMP6 , -(SP) ::PUT NEW PS ON STACK 

MOV 874S, -(SP) ::PUT NEW PC ON STACK 

RTI :: POP NEW PC AND PS 

NOV #-80 «2606 SET US Coulee coum TO READ 80 COLUMNS 
MOV #101, ‘acDS set UE TPUBUET PRABLE AND READ 

TSTB WAIT FOR CONTROLLER READY 

- THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV 2(ADINT) ,PS” 
Mov 2(ADINT),-(SP) ;;PUT NEW PS ON STACK 

MOV ores (SP). ::PUT NEW PC ON STACK 

RTI :: POP Pc 

CLR DISABLE | 

MOV #232,  dADINT HANGE _INTERRUF T RETURN ADDRESS 

CLR geese if A HALT IF AN INTERRUPT OCCURS 
ERROR 5, mS <NO INTERRUPT WITH PROCESSOR AT LEVEL 0 
TSTB =: CDS :MAKE SURE CONTROLLER READY IS SET 

BMI 1s : BRANCH IF 

AR acs Res 
MOV #232,  aADINT Dea NTERAUPT Ae 1 ey ABDRESS 

CLR a#2 A HALT M4 +f INTERRUPT OCCURS 
CMP (SP)+. (SP)+ ee STACK PO 

TST INTFLE ; CHE OR PREVIOUS TER oc 

BMI SETI NCH of FLAG 

MOV #100001, INTFLG ; + 3 FLAG AND LE 

TYPE, INT MESSAGE “THE INTERRUPT LEVEL WAS” 
MOV #1,-(SP) 

TYPOS 

-BYTE 1 

"BYTE 


BR 
001252 100001 SET1: CMP 
ERROR +24 


0 

TST20 

INTFLG, #100001 ;CHECK PREVIOUS LEVEL 
TSTe0 


- INTERRUPT ALREADY OCCURRED AT A LOWER LEVEL 


HO9 
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OZC08.P11 T17 TEST FOR AN INTERRUPT ON LEVEL 1 SEQ O111 


aug : EELEEEREEE EGER EEE EARLE EERE RA EAE AEA LE RAR ERRAA RARER AE REE 


; 20 TEST NO INTERRUPT WITH IE SET & REST CLEARED 
LL ——————— 


FoF IMT i AMTIALE CS, 18, ZERO 
iH FOLLOWING REPRESENT? 


SENTS THE EQUIVALENT OF “BIS #340,PS" 





iB: 





1 5 MOV 34 (SP) ::SAVE CURRENT TRAP VECTOR 
4556 ‘} MOV #645, :: SETUP NEW TRAP VECT 
19S€ 21 TRAP , ::PUSH OLD PSW AN PCON STACK 
1° Ne O00006 64S: MOV 2(SP).6(SP) - 
1956 2 010302 MOV #65$, (SP) - REPLACE OLD PC WITH NEW 
195° 3 RTI . RESTORE PSW 
1¢ 5: 000034 65S: MOV (SP)+,34 > :RESTORE OLD TRAP VECTOR 
196 ik 14 MOV (SP)+.$TMPG 
: ik 001214 BIS #340, $TMPE 
ie ik} 1214 MOV STMPb, -(SP) - PUT NEW PS ON STACK 
3 J 10332 MOV | -:PUT NEW PC ON STACK 
1 3es ak me RTI -: POP NEW PC AND PS 
1 i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 
12 : 900934 MOV 34 (SP) ;§ SAVE CURRENT TRAP VECTOR 
; 000034 MOV #675, ::SETUP NEW TRAP VECTOT 
1S TRAP ::PUSH OLD PSW AN PCON STACK 
gone o00006 67%: MOV 2(SP) (SP) . 
4 MOV cas, t ) - REPLACE OLD PC WITH NEW 
RTI : sRESTORE PSid 
197% 68S: MOV (SP)+,34 ::RESTORE OLD TRAP VECTOR 
t§ | MOV (SP)+.2(ADINT) 
: MOV -tSP) ::PUT NEW PS ON STACK 
376 MOV 469% -(S5P) ::PUT NEW PC ON STACK 
37° uae RTI -: POP NEW PC AND PS 
19€ 12714 177777 MOV #1 @CDC - ; SET UP COLUMN COUNT TO READ 1 COLUMN 
4g 1271 42 MOV #BUFBEG, ICDA § ;SET_UP ADDRESS 
¢ 190 MOV gi00, ‘acDS ;E NTERRUPTS 
I: l CLR t - INITIALIZE COUNTER 
196 001250 1S: INC COUNT -WAIT AWHILE 
ie “THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV 2(ADINT),PS” 
1988 Ol 1 MOV ecADINT) -(SP) ;;PUT NEW PS ON STACK 
198° O10446 MOV #70$, -(SP) ::PUT NEW PC ON STACK 
13 iis :: POP NEW PC AND PS 
1 L CLR ads DISABLE FURTHER INTERRUPTS 
1 l 1 TINT20: ERROR + “AN INTERRUPT OCCURRED 
1 1 CMP (SP)+, (SP)+  ;RESTORE STACK 
i l 13 CLR ‘DISABLE FURTHER _INTERRUP 
1 Ot 005037 000232 CONT20: CLR g#232 "CHANGE INTERRUPT RETURN ADDRESS TO 
i 10464 Ole7i2e o00232 MOV #232,  @ADINT CAUSE A HALT IF AN INTERRUPT OCCURS 
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001214 
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NO INTERRUPT WITH IE SET & REST CLEARED 


103 


EHHRELLAARAERELLLALTLE 


Sedch-iohebcbebobeheihedehehabsbebabadall 
SIMULTANEOUS INTERRUPTS AT MORE THAN 1 


iATEST 21 

‘st21: SCOPE 
JSR INIT 
HOV . se ae 
a ele) 
Mya 34 
TRAP 

64S: MOV 2(SP).6(SP) 
MOV #655, (SP) 
RTI 

653: 1d tae See 
BIS (340 sfnpe 
MOV 8 -(SP) 
MOV #66$, -(SP) 
RTI 

66S: 
OL 
MOV 34. -(SP) 
MOV #675, 34 
TRAP 

67$: MOV 2(SP) .6(SP) 
MOV #68S, (SP) 
RTI 

68S: MOV (SP)+,34 
MOV (SP)+.2(ADINT 
- THE FOLLOMI 
&LR 
MOV nn (SP) 
MOV 385.34 
TRAP 

69S: MOV 2(SP).6(SP) 
HOV #70S, (SP) 

70%: MOV (SP)+,34 

HOV (SP)+ STHPG 
MOV SinPe (SP) 
MOV #715, -(SP) 
RTI 

mS: soy tel, acne 
MOV #BUFBEG, aCDA 
HOV #101,  acDs 

TINT21: CMP (SP)+. (SP)+ 
MOV #TINA21, JRDINT 
MOV PRO, -(SP) 


1 LEVEL 
SESE AE EE EEE EE dE aE 
; INITIALIZE CSR TO ZERO 


INT TURN ADDRESS 
NG REPRESENTS. THE EQUIVALENT OF “BIS #340,PS” 


‘ 
i: ji REPLACE OLD PC WITH NEW 
; sRESTORE PSW 

- RESTORE OLD TRAP VECTOR 


;;PUT NEW PS ON STACK 
3 3 PUT NEW PC ON STACK 
>: POP NEW PC AND PS 


ie FouLeuaNe REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 


tt cave CURRENT TRAP VECTOR 
-: SETUP NEW TRAP VECTOT 
; ;PUSH OLD PSW AN PCON STACK 


is ‘REPLACE OLD PC WITH NEW 
. RESTORE’ PSH 
RESTORE OLD TRAP VECTOR 


NG REPRESENTS THE EQUIVALENT OF "BIC #340,PS” 


t cove CURRENT TRAP VECTOR 
:: SETUP NEW TRAP VECTOT 
;;PUSH OLD PSW AN PCON STACK 


9 
PLACE OLD PC WITH NEW 
Reson PS 

sRESTORE OLD TRAP VECTOR 


+ BOT NEW PS ON STACK 
T NEW PC ON STACK 
3% i BoP NEW PC AND PS 


‘eet UP COLUMN COUNT TO READ 1 COLUMN 
T UP_BUS ADDRESS 
CET INTERRUPT ENABLE AND READ 
-WAIT FOR INTERRUPT 
; RESTORE STACK POINTER 
RETRUN ADDRESS 


t PUT NEW PS ON STACK 


SEQ Olle 





JO9 








MAINDEC - 11 - DZCOB-B WMACYI1 27(654) 1-JUL-77 08:39 PAGE 41 
0ZCDB.P 11 Tel SIMULTANEOUS INTERRUPTS AT MORE THAN 1 LEVEL SEQ 0113 
2053 010740 012746 01074 MOV 64S, -(SP) PUT NEW PC ON STACK 
Mra “w- RTI -: POP NEW PC AND PS 
i 000240 NOP -WAIT 
THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV 2(ADINT),PS” 
an gogg02 P(ADINT).-(SP) ;;PUT NEW pS ON STACK 
5055 #655, -(SP) ; sPUT ON STACK 
506C je RTI -: POP NEW PC AND PS 
OE BR CONT21 
0 262k TINA21: CMP (SP)+, (SP)+  ;RESTORE STACK 
5064 ERROR + :THE INTERRUPT OCCURRED AT 2 LEVELS 
206° CONT21: CLR acos ;DISABLE INTERRUPTS ini kate 
=I JUUE : 
3067 i WWWERE MOV Heo JADINT i CAUSE A Ht ERR AN HRN RPT CURS 
2065 : LEEEEEEELEELLELE EE EERE REE RE EEE EEE EAE AE REE ERAS RE REEL EL EERE 
2070 * 22 TANT MEMORY T 
48 + PELRERKRKREKERERRRER EEEERREREEELALARARERERERAERAERAR LAR ARAL ALE LA ELE 
3075 Ot 100s ste: Score INIT NITI CSR TO ZERO 
07% it 10 MOV atintT22 JADINT TU RETURN ADDRESS 
ite . i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIS #340,PS” 
4f - } - = 3 
af tt 34. -(SP) ::SAVE CURRENT TRAP VECTOR 
tte 1 000034 MOV #65S, 34 :: SETUP NEW TRAP VECTOT 
2075 TRAP ::PUSH OLD PSW AN PCON STACK 
208C Q00006 64S: MOV 2(SP),6(SP) i 
206 #65, (SP) - REPLACE OLD PC WITH NEW 
0B¢ RTI : -RESTORE PSW 
208. 65S: (SP)+, 34 - RESTORE OLD TRAP VECTOR 
= Wt i V (SP)+ Mg 
08° 001214 BIS STMPE 
208€ STMP6, - (SP) ::PUT NEW PS ON STACK 
2087 MOV #665, -(SP) ::PUT NEW PC ON STACK 
-U8E ; oe RTI ;: POP NEW PC AND PS 
UD : 
na i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 
"> ~ ee 
209¢ 108 MOV 34. -(SP) ::SAVE CURRENT TRAP VECTOR 
209: 000034 MOV #675, 34 : SETUP atte TRAP VECTOT 
=U le TRAP ; >PUSH PSW AN PCON STACK 
2095 4 000006 67%: MOV 2(SP).6(SP) - 
0% 111 MOV #68S, (SP) - REPLACE OLD PC WITH NEW 
097 O11! RTI : sRESTORE PSW 
998 O11] 683: MOV (SP)+,34 : RESTORE OLD TRAP VECTOR 
999 O11134 MOV (SP)+,2(ADINT) 
i we i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIC #340,PS” 
Ne ie MOV 34. -(SP) ::SAVE CURRENT TRAP VECTOR 
103 O11) 000034 MOV #695, 34 :: SETUP NEW TRAP VECTOT 
1¢ Hiss TRAP ::PUSH OLD PSW AN PCON STACK 
a1 S Olli poo: +469$: MOV 2(SP),6(SP) 3; 
106 O11164 MOV #70$, (SP) : REPLACE OLD PC WITH NEW 
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MACY11 27(654) 1-JUL-77 08:39 PAGE 4e 
NON-EXISTANT MEMORY DETECTION 


SEQ 0114 
; ;RESTORE 
RESTORE OLD TRAP VECTOR 


s3PUT NEW PS ON STACK 
1 Boe EW Bc Aww PS 


1SET Up GOs Boke’ 10 won Exts tant enory 


cet . X MEM BITS SET 
BLT OR IN sTRTERRUPT 
“C INTERRUPT RETURN ADDRESS TO 


Se 8, A HALT IF AN_INTERRUPT OCCURS 
“CHECK FOR CONTROLLER READY 

‘BRANCH IF OK 

; LER READY DIDN’T SET 


“CHECK FOR ERROR (BIT 15) 
*BRANCH IF OK 
: BIT 1S NOT SET 


-CHECK FOR NON-EXISTANT MEMORY (BIT 9) 
“BRANCH IF SET 
-BIT 9 NOT SET 


CHECK FOR EXTENDED MEMORY BIT 17 SET 
BRANCH IF SET OK 
-EX-MEM BIT 17 GOT CLEARED 
‘CHECK FOR EX-MEM (BIT 4) 
“BRANCH IF SET OK 
EX-MEM (BIT 4) GOT CLEARED 
x CK FOR any OTHER BITS 
v EXTRA ERROR BITS SET 
- CHECK ADDRESS BUFFER 
‘CORRECT ’CDA’ CONTENTS FOR ERROR REPORT 
“BUS ADDRESS REG CHANGED 
CHECK COLUMN COUNT REG 
‘CORRECT ’CDOC’ CONTENTS FOR ERROR REPORT 
COLUMN COUNT REG CHANGED 


i HER EENS RHEE ETATTE Dee OATOBCLOM BYTE). LOAD, ON COLUMN COUN 


DATOB 


(LOW BYTE) 


TEST 23 DA*I LOAD ON COLUMN C 
HEE HHH HE HHH EHHHEB HEEB HEB HEHHH HEHEHE HEHEHE HHEEE 


RTI 
000034 70S: MOV (SP)+, 34 
14 MOV (SP )+ STHPG 
001214 BIC #340, $ 
14 MOV STMP6, -(SP) 
Olleee HOV #71$,-(SP) 
, 71$: ‘in 
166008 MOV #1 ; 
161 HOV #161,  acDS 
TINT22: CMP (SP)+, (SP)+ 
900232 CLR as2e32 
32 MOV #232,  dADINT 
TSTB acos 
ERROR +23 
1S: TST acos 
BMI 2g 
ERROR +26 
001000 2$: BIT #1000, acDS 
BNE 3$ 
ERROR +27 
000040 3S: BIT #40, acos 
BNE 4g 
ERROR +30 
000020 4g: BIT #20, acds 
ERROR +31 
076417 S$: BIT #076417, aCDS 
BEG £& 
ERROR +32 
160002 6S: CHP #160002, ICDA 
160002 001210 MOV #160002, STMP4 
ERROR +33 
177774 7$: CMP #-4, acnc 
BEQ 10$ 
177774 001210 MOV 8-4, STMPY 
ERROR +34 
10S: 
+5123: SCOPE 


MQINDEC - 11 - DZCDB-B MACY11 27(654) 1-JUL-77 08:39 PAGE 43 
O2CDB. P11 T23 EXECUTE DATI,DATOB(LOW BYTE) LOAD ON COLUMN COUNT SEQ O1IS 
gi6 011364 005014 CLR acoc -CLEAR COLUMN COUNT REGISTER 
‘PRIOR TO BYTE LOADING 
y COM acDc 
01370 012700 000152 MOV #152, RO 
110014 mMOVB RO, acDC ;ATTEMPT TO LOAD LOWER BYTE 
OF COLUMN COUNT REGISTER 
011376 o20014 CMP RO, ACDC ‘DID HIGH BYTE GET LOADED AS 
: {WELL ON A LOW BYTE LOADING? 
, Bt Lage ey 001210 ' fo, ste ist cboo Bar a - SHOULD SHOULD BE 
? tects — ‘BYE et Wr Riat DR COUNT EPGISTER 
73 O11410 1S: 
5 3 SE a a a a 
7 "#TEST 24 EXECUTE DATI.DATOB(HIGH BYTE) LOAD ON COUNT 
ee eee 


Biiaie BO8014 tste¥s ar acoc on or 
i BRTOR TO 


BLAS BGR HEB Ca is ty aero tee game ™ 


011424 005714 TST acdc Bip cs is ict 


tat iy 


3. BETE LOADING? 
ig 001210 CLR STMPY et "pata - SHOUL!) BE 
4 l ERROR +34 *LOW E LOADED ON A HIGH 


BYTE LOAD OF COLUMN COUNT REGISTER 
011436 1$: 
9 9 A a EE EE EEE 
CU COUNT TE 


at yet ort, 


| 
| ; 
| 
| 
| 
; 


011466 1$: 


ETE TT TET OBL BYTE) LOAD ON BUS. ADDRESS 


TE DATI,DATOB(LOW BYTE) L BUS SS 
| SUSSEDESSRERUUUEDBOOUEEEESESSSSSESESSSESERSUSESSEESSESDSSESSSS® 


ll tST26: SCOPE 
iets Spebis CLR acoA ;CLEAR BUS ADDRESS REGISTER 
“PRIOR TO BYTE LOADING 


-#TEST RE 
y i sepescdeapennensupneusonsnsoosnnenesnensensveusscneusesveente¥s 
Teme Ran sg cpu prcele 
011442 012714 100000 MOV #100000, aCDC : KNOWN VALUE INTO COLUMN 
011446 OOS414 NEG acnc : DATIP, ON COLUMN COUNT 
C 1 2714 1n9000 CHP #100000, acDC | NTS = : 100000? 
C4 100000 001210 nO #100000, STMP4 Stone c000 ‘bara - SHOULD BE 
4 | ERROR +34 S OF COLUMN COUNT REGISTER 
3 : INCORRECT 
55 
>> 


rhehetes 
ro eo OOO 


Wo 
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“= er 


FLILF 


Pororororororonor mond: 
7 


a 


44 rorurororur 
ran toto 


ehhh eh eh ed 


st tt 


"Orororu 
ey 


PrUruron 
a4 


' 


7 
-\ 
- 

> 
> 

> 
a2 

. 
“¢ 


44 
4 
+e 


~ 


612 BLIdh§ BY2+e 
gel? 011500 110015 


011502 


SIR 


011514 


B1i8i¢ 
Bt 1858 


011530 


IBS 


011542 


Biie¥4 


011546 
011552 


ie 


011572 


Hits 


011604 


T26 





020015 


a 


a? le 


OOSO46 


MACY11 27(654) 
EXECUTE DATI,DATOB(LOW BYTE) LOAD 


0001Se 


001210 


001210 


100000 


100000 
100000 


744 
146 


of 


001210 


1-JUL-77 08:39 PAGE 44 
ON BUS ADDRESS SEQ O116 
Sov ss Sie2.RO 
MOVB RO, acDA Be aupRE ge TO Ee ee LOWER BYTE 
CMP RO, dCDA ip H ete: GET LOADED 
as is BYTE L NG? 
BEQ i$ 
MOV RO, STMP4 ey VBATA 
ERROR +33 wor LOA RA Lu 
GISTER 
1$: 
. HEHEHE HHH HEHEHE HHH HHH HHH HHL 
: #TEST 27 EXECUTE DATI,DATOB(HIGH BYTE) LOAD ON BUS ADDRESS 
jevesentoassasuetss rPeeTeTeerererttrt rit iti tit tt tet tii ttt) 
acDA BUS ADDRESS ape 
RO 8 AiG, r9 err nrOR BYTE LORD FROM RO 
HOVE Rosi ) rat 
an EPR IRIE a 
iI HIGH LOADING? 
eR $Fupy TORE GOOD DATA - SHOULD BE 
ERROR +33 “LOW BYTE LOADED ON AH 
“BYTE L LOAD 


1s OF BUS ADDRESS REGISTER 


; HENEEEARENSERESERSSESESEAHESARERESEEEREED ANDES 
;¥TEST 30 EXECUTE DATI,DATIP ON BUS ADDRESS REGISTER 
JHB EEE 


HEHEAALAALELELELE 







jLHRASOEAEHSREEESSEEEERESEREORSHAEAES KELEREEEEEEE 
LR acDA fates BUS, agg REGISTER 
MOV #100000, 3CDA : SET KNOWN VALUE INTO SBus 
NEG acDA [is iP. ON BUS ADDRESS 
CMP #100000, 3CDA Is = 100009? 
hoy i ROE coo Ba 
MOV #100000, STMP4 ST TA - SHOULD BE 
ERROR +33 ‘CONTENTS OF BUS ADDRESS REGISTER 
: INCORRECT 
1S: 
5 9 3 2 A A 
-“TEST 31 WORD T OVERFLOW T 
ee ee 
" JSR PC. INIT : INITIALIZE 
MOV Rise BADINT “SET UP A RETURN ADDRESS 
“THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIS #340,PS” 


&LR LOSP) .¢ 
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001214 





8 


sf 


1 





A + . . - - * + - : + - _ : - _ = - - + « . 
>. - o> «® oe 44 -% gs oh ¢4 o 4 44 
- . > > _ : . > + « 








0. | 
23 12012 
3c 
IU 718: 
~ 
30 000034 
# 000006 72S: 
: 
+ 733: 
, 
3 001214 
= JC 743: 
fe 012714 177657 





BBSRBS NSS ZSSE-SIASS MSE. ABANSIAITGTS 


a 
co 


FOLLOWING 


NO3 


1-JUL-77 08:39 PAGE 45 


34, -(SP) 
#645, 34 


2(SP) .6(SP) 
ces. (SP) 


- (SP) 
34, -(SP) 
#6 


2(SP) ,6(SP) 
#705, 8p) ) 


2 Fee 
8 A 
#71$,-(SP) 
34 (SP) 
#72$, 34 : 
2(SP).6(SP) 
#735, (SP) 
(SP)+. STMP6 
STMPb, -(SP) 
874S, -(SP) 


#-81.,aC0C 


;;SAVE CURRENT TRAP VECTOR 
;;PUSH OLD PSH AN PCON STACK 
7 -sREPLACE OLD PC WITH NEW 
; sRESTORE PSU 

- RESTORE OLD TRAP VECTOR 
: PUT NEW PS UN STACK 


PUT NEW PC ON STACK 
;; POP NEW PC AND PS 


REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)™ 


j SAVE CURRENT. TRAP VECTOR 
+ BUSH ol'b pa AN STACK 


nf T OLD PC WITH NEW 
. «RESTORE Pe 
»:RESTORE OLD TRAP VECTOR 


} 
}+' 2(ADINT) 
ING SPREE SENTS THE EQUIVALENT OF “BIC #340,PS” 


cs NEW TRAP VECTOT 
- OLD PSW AN PCON STACK 

ss - REPLACE OLD PC WITH NEW 
: sRESTORE PSW 


-sRESTORE OLD TRAP VECTOR 


;;PUT NEW PS ON STACK 
-:PUT NEW PC ON STACK 
;; POP NEW PC AND PS 


GAVE CURRENT TRAP VECTOR 
tTETUP NEW TRAP VECTOT 
: BUSH OLD PSW AN PCON STACK 


fe --REPLACE OLD PC WITH NEW 
: RESTORE PSW 
RESTORE OLD TRAP VECTOR 


SEQ 0117 
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> 
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A Ay de 4 
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Fi 
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> 
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’ 
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> 
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 . 
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A. 
> 
ws 
++ 
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x 
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x) 
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+; 
~£ 
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oe 
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012100 


S iat 
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He 


012140 


| 
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012715 






















77 08:39 PAGE 4% 
2ND CARD 
Sr sia 
MOV SBUF BEG, 3CDA 
#101, aCDS eae ves 
15: Pere 
BP! i$ ery IT 
THE FOLLOWING REPRESENTS THE E ihe “MOV 2(ADINT), PS” 
fov sate Bat oN os 
Ot i 
; -AND GIVE CONTROL BACK TO THE 
R : S 
nb SADINT : RETURN ADDRESS 
CLR 32 10 "HALT? IF AN UNEXPECTED INTERRUPT 
ERROR +41 NO INTERRUPT WITH PROCESSOR AT 
JMP T31END en TL TEST 
TINT31: IST READY SET? 
ERROR +23 ; Y Nor SET 
1s: Se onDINT RES Cae 
CLR sos" 10. he I RU MCRPECTED FOOTE BRUPT 
CMP (SP)+, (SP)+ ipESET STACK FROM THE INTERRUPT 
CMP eBUFBEGHeN2, CDA ; 2 CARDS READ?” 
BEQ T3l F Y SO 
001210 MOV SUF BEG+242, STNPY DATA - BE 
rnsetioce as fo NE READS CARDS 
T31END: 


EE Ee DORESS OOD 8 TRANSFER. IN NON-PACK MODE 
* i 
a Renee commas 


tST32 


i, re a ; INITIALIZE 10 
En I 
MOV VE ie TRUCTION 
MOV $540 RESVEC#2 ILLEGAL INS TION 

INC acos 

TSTB @CDS fre READY 

BPL 1$ 1 IL 

BR 3$ 60. iy 

ERROR +70 i NON PBCK eee USED A TRAP IN 
CMP (SP)+, (SP)+ jRESET STACK ce ILLEGAL INSTRUCTION 
MOV #12,10 t RESTORE TRAPCATCHER AREA FOR 


SEQ 0116 





MAINDEC ~- 11 - ogege-s AD 27(654) 1-JUL-77 08:39 PAGE 47 
OZCOB.P il 32 ADDRESS ODD & TRANSFER IN NON-PACK MODE SEQ 0119 


012262 005037 000012 dle -UNEXPECTED TRAPS TO LOCATION 10 


CLR 
AND TO 1 U1 IF SET, AFTER RINGING BELL 
oe G0 I 0 THE DAT 


166640 BIT #200, ISWR 
BEQ pATST ierancs 1 If Sor TO DATA TESTING 
TYPE,  SBELL 
COM TRFLG iT OGELE Nee ORAGE FLAG 
JMP RESTRT -GO BACK TO INSTRUCTION TESTS 


s/BNSZHNS JENS JENS ZENS ZING ZENS EN: JEN: J8N2 JENSEN FINI ZAIN ZEN ZEN ZENE: 
*/#N: V7, UL WOU SATA BETA ATTA TTL ATTA ATTA ATTA ATTA ATTA ATA ATA ATA 74EN: 


‘Thre HORNS ON REQUIRED Le lec CFU ER ROMPLETION 


NRA ENS ENE EZ EIR ENR RZ NZ RZ 2 RZ NZ NZ NZ NZ NZ NRE: \k 
et NRA NRA NZ NZ 2 NZS NR 2 NBS NES NES: NBA 2 NBS ENR ENR ENB SNR NRZ ENE NE 


ig 





ett tt} 411-54 idotd-tolgh-t-4-4-155-5-toled-b-tobelalelalaladaledabeielalalalelalelalelalalalalalalalalelaleialchaiclelslelsieleiela 
; DATA RELIABILITY TEST FOR CD11 


2 3-3 GE I I A EE 
SWR_ FOR oy DECK Peite f ines INIT age POINTERS 


bast HEE HNITIALT te P creet FOR cA OR NT ts Oh OF Dec 
BRS LS gs eo 


?. vy 


-fkeL ES 


wat hw ee Se ee 


wr 





CLR 
CLR 
CLR 
CLR 
BIT iCHECK BIT 4 OF OR TYPE OF DE 
BEQ F NOT SET TO fe IC POINTERS 
HOV ‘BIT 2 SET, LOAD BINARY TABLE POINTERS 
MOV 
BR SBRANCH AROUND RIC POINTERS 
ALP1: MOV {TOAD ALPHANUMERIC TABLE POINTERS 
f MOV 
Ye MOV 
Bee CONTD: TST ;CHECK TRACE TRAP FLAG 
ate aie 'BRANCH IF FLAG WAS SET 
ats Mov. —«~PIR7,-(SP) ; ;PUT NEW PS ON STACK 
ae MOV #648, - (SP) ;;PUT NEW PC ON | STACK 
546 RTI :}" POP NEW PC AND PS 
= vet 64S: 
; BR DCN 
: TRP1: SIT 810000, aSWR © ;CKECK SWi2 TO INHIBIT TRACE TRAPPING 


oOo 
Ns 


REEeE: 


sete 


44-4 


$H¥FSFtF 


fur. 


artes 


5S.Oe 


ISA Z05— 


- ‘ 


or 


Leese 


S 
é 
VO 





001214 


64S: 
DCNT1L: 


Q 33SR 


PC, 


D10 


INIT 


-INITIALIZE CARD READER STATUS REGISTER 
NG 


-SET UP INTERRUPT SERVICING, AND START READI 


64S: 


655: 


66S: 


675: 


68S: 


CDREAD: 
BKGND: 


BKGND1: 


ABSSESASS SESE 


> 


ie I ieee bene peer bia 


Boge 
am 


Sp 
#675, 34 


&(SP) 
#68, (SP) 


2(SP) 


aSRVC ; 
- THE FOLLOWING REPRESENTS THE EQUIVALENT 


34, -(SP) 
8604S, 34 


SETUP RETURN POINTER 
OF “BIC #340,PS" 


GAVE CURRENT TRAP VECTOR 
EP TUP NeW TRAP VECTOT 
»:PUSH OLD PSW AN PCON STACK 


. :REPLACE OLD PC WITH NEW 
. sRESTORE PSW 
«RESTORE OLD TRAP VECTOR 


>;PUT NEW PS ON STACK 
;;PUT NEW PC ON STACK 
POP NEW PC AND PS 


: THE FOL. REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)™ 


:: SAVE CURRENT TRAP VECTOR 
:: SETUP NEW TRAP VECTOT 
-:PUSH OLD PSW AN PCON STACK 


" - REPLACE OLD PC WITH NEW 
: sRESTORE PSW 

- RESTORE OLD TRAP VECTOR 
;SET UP TABLE POINTER 


«SET UP BUFFER POINTER 
sSeET UP” 


> READ 
-CHECK FOR DATA ERROR 


sSAVE THE COLUMN COUNT 
sCHECK FOR DATA ERROR 


: IF SET 
“CLR COLUMN COUNT SAVER 


SEQ O1e0 


E10 





MAINDEC - 11 - DZCDB-B MACYI1 27(654) 1-JUL-77 08:39 PAGE 49 
O0ZC08.P11 DATA RELIABILITY TEST SEQ 0121 
cube : j INTERRUPT SERVICE ROUTINE WHICH ae DATA RELIABILITY TEST 
a Ze (Be ak cd es 
ERROR +23 READY NOT SET 
490 01 o00002 1$: BIT #2 acDS  —_; CHECK FOR DATA PACK MODE 
491 Ol BEG SR sBRANCH I MODE 
ude Ol 137 013640 IMP PSR : JUMP TO BAEK MODE RONTINE 
546 1 13. 177477 ISR: BIT #177477,aCDS § ; CHECK ALL BITS BITS EXCEPT & AND 7 
49S Ol BNE 1$ : BRANCH ROUTINE 
496 601 BR 25 ; OTHERWISE ERENT INUE. ON 
ie, 013510 1s:  JMP  ISRER :GO TO ERROR ROU? INE 
4 96 y 25: TST acDC CHECK COLUMN COUNT 
2495 1 BEQ 3$ ‘BRANCH IF OK 
250 001210 CLR STMPY ‘CORRECT ’CDC’ CONTENTS FOR ERROR REPORT 
501 OI i ERROR +34 “COLUMN COUNT REGISTER NOT C 
503 Ol 01 15320 3$ MOV RO BUFEND 
A a 
+ Je 
250 5 0 CHP BUFERD, acdA | 
+18 WC. SRNC 
2508 t 015320 001210 MOV BUFEND,STMPY § ;CORRECT ’CDA’ CONTENTS FOR ERROR REPORT 
AC l ERROR +33 
+ 4 
2 0 001250 ISRNC: MOV I COUNT T UP COLUMN COUNTER 
aS 1¢ bP r2 ISRLP: TST Ear WE ON A CARD READER WITH 
5 | be. #14 INSTALLED? 
etd BMI : BRANCH 
+: 0g 200 Bae STHPO -GET THE T 
2} , V? 001200 BIC 9170000, sTHPO : STRIP SFE a 4 BITS BEFORE COMPARISON 
4 l CMP % RO)+ -1S VALUE SAME AS INTO MEMORY? 
1s Ol BR ea  OTHERAISE NCONTINUE ON 
+14! 1S: CMP (RO)+, (R1)+ ;TE ae 
296] BNE ISRDE BRANCH IF DATA ERROR 
+34 015330 ISRRT: CMP Ri, TEND = ; CHECK F END OF TABLE 
2S ; BMI i$ - BRANCH te 
256 1 015326 MOV TSTART, R1 sHOVE PO ATER. TO TOP OF TABLE 
525 013110 l 1S: INC COUNT : CHE FOR OF BUFFER 
Set i 18 Q ISRBE ; BRANCH IF ENPFER END 
a4, 015334 INC CLCNT ;KEEP TRACK OF COLUMNS 
See 0131 001212 ADD #2. STMPS TE TABLE OFFSET FOR CARD #1 OF DECK 
529 0131 l 0001 CMP CLENT, #120 i: CK FOR END OF 
sot 131 BNE ISRLP IF NOT END OF CARD 
+: i 140 014710 ISR PC NXCRD ;INC TO NEXT CARD 
25 3c 44 TST (RL)+ ‘UPDATE TABLE POINTER FOR NEXT CARD 
333 013146 BR ISRLP 
~~ 
25 36 131 737 014710 ISRBE: JSR PC NXCRD  ;GO TO NEXT CARD 
523 131 ISRNX: TST (RL)+ 
De 131 000004 165752 BIT 4 JSWR  ; CHECK FOR IMAGE MODE ONLY 
538 013164 001002 BNE ISRNX1 ‘BRANCH IF SET 





F10 


MAINDEC - 11 - UZCDOB-B MACY11 27(654) 1-JUL-77 08:39 PAGE SO 
OZCOB.P11 DATA RELIABILITY TEST SEQ Ol22 


PAKSET ;SET UP FOR PACKING NODE 
; CALCULA 





004737 014522 ISR PC 
000137 014436 ISRNX1: JMP SRETRN TE "SIZE" AND RETURN 


-DATA WAS TED, OUTPUT PRINT 
015332 iShoe:" sr eben BRECK ER F RST CARD 
ISRD1: TST 1980 oS “SUB 2 INTER 
ae 015332 INC CDCNT 
+: 166022 TST acDDB -ARE WE ON A CARD READER WITH 
TH BMI 1S ;ECO $14 prSTeLeD? 
pet rent 001200 are sf 700 a SHPO GET peer TOP y BITS BEFORE COMPARISON 
a55¢ AOR CMP si7onu0, s1m iBore VALUE MATCH THAT D INTO MEMORY? 
5ee oe | (BS ORMCTSE. CONTINUE. ON 
55 1s: CMP  (RO)+, (RI)+ jTEST THE DATA 
= as: M5 fe, yaa fmtle Rie 
55 ieee CMP RI.’ ~—sS TEND ~—s CHECK FOR RAP 
1 oF usar by 
OOS CD 3$ TST aCDDB ARE WE ON A READER WITH 
BMI so? eh IF Yes 
MOV (R1).STMPO ;GET THE TABLE VALUE 
991200 BIC #17 $1 i STRIP ot OP 4 BITS BEFORE COMPARISON 
001 CMP 42(RO),$TMPO ; MATCH FOR A DOUBLE? 
ee ‘3 OEE cE MCONTINUE ON 
oo0042 7S: CHP He(RO), (RL) CHEEK iF for MATCH 
4§: 2, R SUB Tac NUMBER 
Bieaze sug #2, Bloor TBHEGR FOR RAP AROUND 
BGT ISRRT ; BRANCH IF NOT 
000240 ADD RI :RAP ROUND 
BR ISRRT *GO CHECK REST OF DATA 
yo Ss: SUB g42, Rl » SUBTRACT MAGIC NUMBER 
1 CHP RI, TSTART :CHECK FOR RAF AROUND 
900240 ADD #240, Ri RAP AROUND 
1 6S: CMP RI TEND 
BNE TSRO1 
15326 MOV TSTART.R1 ;OBTAIN THE 1ST TABLE ENTRY 
ADD STMPS Ai “ADD T OFFSET FOR CARD #1 OF DECK 
A00 2 Rl ;G0_ AH ONE TABLE POSITION FOR ERROR PEPORT 
eat 165520 ISRD2: BIT #20000, aShR “CK Sus FOR TNAIBIT PRINTOUT 
014SS4 JSR Ma ” TYHEAD OPE HEADING DECK, CDCNT, CLCNT 
165610 TST acbos ‘ARE WE ON A CARD READER WITH 
“ECO #14 INSTALLED? 
BMI 1S ‘BRANCH IF YES 





| 
| 
| 


ai 


a ee He 


pe eee ee 


o00 OOO 
op bee eet fae Pee 


me ee 
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MACY11 27(6S4) 1-JUL-77 08:39 PAGE Sl 
DATA RELIABILITY TEST 
001200 MOV -(R1). STMPO 
tat 001200 BIC 9170000, S110 
MOV 
ae 
4: MOV _ 
: TYPOS 
-BYTE 6 
-BYTE 1 
030545 TYPE, SPACE 
MOV -(RO),-(SP) 
TYPOS 
BYE of 
CMP (RO)+, (R1)+ 
165436 ISRDE4: TST aSWR 
ae 1s 
013076 1$: HP ISRRT 
- INTERRUPT DUE TO SOME KIND OF E 
* THESE ERRORS ARE DISASTEROUS, 
{SRER: BMI ISRE1 
ERROR 
BR ISRST 
910000 ISRE1: BIT #10000, a@CDS 
BEQ ISRE2 
040000 BIT #40000, 3sCDS 
BNE 1s 
ERROR +35 
GR ISRE3 
014650 1S JSR PC, LASTCD 
BGE es 
ERROR +57 
BR ISRST 
013034 2$: IMP ISRNC 
040000 ISRE2: BIT #40000, aCDS 
3 ISRE3 
020000 ISRE3: BIT #20000, aCDS 
BE 1$ 
+61 
004000 1$ BIT #4000, aCDS 
BEG es 
ERROR +62 
002000 2$ BIT #2000, aCDS 
BEQ 3$ 
ERROR +63 


SEQ 0123 


RE OS PR MRT 
EUS SHO D @ DATA ONTO STACK 


{HALT ON ERROR SET 


RROR 
THEREFORE THE DATA TEST IS RESTARTED 
sBRANCH ON E T 1S 


RROR BIT 1 
sERROR BIT 1S NOT SET 
sCHECK FOR OFF-LINE 
;CHECK FOR CARD READER ERROR 


‘BRANCH IF SET 
-OFF-LINE BUT NOT CARD READER ERROR 


;CHECK FOR LAST CARD 
: BRANCH H IF BOTH CARD 
-CARD READER ERROR BUT NOT 80TH CARD 
-IF 80TH CARD - GO HERE? 
*CHECK FOR CARD READER ERROR 
F NOT 


: ‘CARD READER ERROR BUT NOT OFF LINE 
END OF FILE ERROR (M1200 ONLY) 
DATA ERROR 


:DATA LATE ERROR 
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014710 
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3s: ert #1000, aCDS 
- a S MEMORY ERROR 
4S: i. , acDS ; CHECK nk ERROR B's 
+37 -NONE OF THE TS SET 

ISRST: DATRST -RESTART THE ENTIRE pate te Bt 
PSR: BIT #177475,aCDS  ;CHECK ALL BITS EXCEPT 1,6 AND 7 

fi7g baer ORR RWI GO TO REPORT ERROR 
1S: TST acoc ‘CHECK COLUMN COUNT REG. 

BEQ 2s . IF OK 

CLR : STMPY ‘CORRECT *CDC’ CONTENTS FOR ERROR REPORT 
™ Rov SIZE, BUEEND ? 

Seo PSRNC 

BOY : _BUFEND, STHPY CORRECT 'CDA’ CONTENTS FOR ERROR REPORT 
PSRNC: MOV SIZE COUNT ;SET UP COUNTER 
PSRLP: CHB (RO)+, (R1)+ ;TEST TA 
PSRRT FORDE en TRAE FOR END OF TABLE 

ae: en iGRANGH TF 

MOV TSTART, Ri -MOVE POINTER TO TOP OF TABLE 
1S: INC COUNT ‘CHECK F BUFFER 

Ae OEP CAT - BK OE EOLUMNS 

ADD #1. $TMP4 ‘UPDATE TABLE OFFSET FOR CARD #1 OF DECK 

CMP ENT, #120  ;CHECK F ENO ARD 

BNE P janie | F NO ND OF CARD 

TSTB ss CRLD + ‘UPDATE TABLE POINTER FOR NEXT CARD 
PSRBE: JSR PC NXCRD  ;GO TO NEXT CARD 
PSRNX: STB RL) ai 

BNE BeR ax 

SUB #160., TSTART ;MOVE TABLE POINTER TO IMAGE TABLE 

SuB #80., | TEND 

SUB #160. Ri ; UPDATE TABLE PO NTER 

Nt’ Ri COMPENSATE FOR BYTES 

BIC aCDS § ;CLR PACKING MODE BIT 
PSRNX1: JMP TRN *CALCULATE "SIZE" AND READ MORE CARDS 
-DATA ERROR WAS DETECTED, OUTPUT ERROR PRINTOUT 
PSRDE: TST CDCNT 

BNE PSRD2 
PSRDI: TSTB -(RO) -SUB 1 FROM POINTER 

INC CDCNT 

CMPB 40s«(RQ)+, (R1)+ ;TEST THE DATA 


SEQ 0124 
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02CDB.P11 DATA RELIABILITY TEST SEQ 0123 
3701 001031 BNE 1S ;BRANCH IF NOT THE SAME 
062701 000021 ADD si, Ri -ADD THE MAGIC NUMBER 
nme ane} i CHECK FOB Roy AROUND 
eas, ge HR, Thy Bee Pr baume reex 
BNE 5 ; : i 
000021 SUB #21, SUBTRACT THE MAGIC NUMBER 
2705 015326 CHP Ri.’  TSTART ;CHECK FOR RAP AROUND 
' T i ; NOi 
| 000120 ADD #120, Ri . 
BR t GO CHECK REST OF DATA 
000021 3$ SUB #21, : SUBTRACT MAGIC NUMBER 
015326 CMP Ri, TSTART CHECK FOR RAP AROUND 
tf, Be tf o0 Rl ia 
a7 1E 1 950 1S: CMP Ri, ' TEND 
aC SOY FeTRRT Rl Ogre N THE 1ST T ENTRY 
ud ADD 40—s«éS MPS, AI ROO ABLE of Poet COR EARD #1 OF 
th 1 0D a Rl fe ONE TABLE POSITION FOR DEROR REPORT 
164726 PSRD2: Br s20000, at 1 eh PRINTOUT 
= 
a7 et 01464 JSR PC TYHEAD rat BRONTE ADING. DECK, CDCNT, CLCNT 
45 TYPE , 
27 ef MOVE’ -(R1),-(SP) PUSH SHOULD BE DATA 
+ TYPOS ; ONTO STACK 
BYTE 3 
73 | BYTE O : ERROR TYPEOUT 
k 030542 TYPE,  SPACE-3 
k MOVE) -(RO),-(SP) -PUSH WAS 
TYPOS “ONTO STACK 
ef 3s eve 3 >FOR 
"BY 0 ERROR T 
; CMPB. s«(RO)+, (R1)+ ;RESET POINTERS 
T: 164666 PSRDE3: TST aSWR *CHECK FOR HALT ON ERROR 
< BPL 1$ ‘BRANCH IF HALT ON ERROR NOT SET 
HALT ‘HALT ON ERROR SET 
1S: BR PSRRT 
- INTERRUPT DUE TO SOME KIND OF ERROR 
1 SRER: BMI PSRE | . BRANCH ON ERROR BIT 15 
a7 4E ERROR +26 “ERROR BIT 15 NOT SET 
> Ol 63 BR PSRST 
e748 01 13 o04000 PSRE1: BIT 84000, aCDS 
749 «(Ol 414 BEQ PSRE2 BRANCH IF NOT 
2750 1 713 oooo02 BIT #2, acds 
276 1001 BNE 18 
z: 14 104065 ERROR +65 
37¢ 14 032 op00020 164626 15: BIT #20,  aSWR 
4 O143] 1001 BNE 2¢ BRANCH IF BINARY DECK 
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OZCDB.P14 DATA RELIABILITY TEST SEQ 0126 
275s 014312 104066 ERROR +66 
014314 012737 177660 O01250 2S: MOV #-120, COUNT  ;ONLY READ ONE CARD 
He ase me 010000 PSRE2: BUT , @CDS § ;CHECK FOR OFF-LINE 
4 040000 BIT #40000, 3CDS § ;CHECK FOR CARD READER ERROR 
14 1$ ‘BRANCH IF SET 
+35 OFF-LINE BUT NOT CARD READER ERROR 
57 14 BR PSREY 
737 014650 1S: JSR = PC, LASTCD ; CHECK FOB BLAST CARD 
BLT eg 
013714 JMP BRANCH ia BOTH CARD 
7 2s: ERROR +57 - CARD ERROR BUT NOT 80TH CARD 
137 015306 IMP —sdDATRST -RESTART THE ENTIRE TEST 
14 743 040000 PSRE3: BIT #40000, 3CDS § ;CHECK FOR CARD READER ERROR 
14 1 BEQ = PSRE4 ‘BRANCH IF NOT 
4 1 ERROR +60 CARD READER ERROR BUT NOT OFF LINE 
4 3 020000 PSREY: BIT #20000, aCDS 
775 O14 Q 1§ 
277% E +61 END OF FILE ERROR (M1200 ONLY) 
a4 ae 713 002000 1S: BIT w2000, acDS 
578 Bid sDATA LATE ERROR 
782 O14412 13 001000 25: BIT #1000, acDds 
2783 «(O14 1401 BE 38 
57 | Wu iy ERROR +64 -NON-EXISTANT MEMORY ERROR 
785 O144 3 077000 3S: BIT 8077000,aCDS +; CHECK ALL ERROR B 13 
786 0144 l Pron PSRST ‘BRANCH IF AT LEAS 
4 44 sn, -NONE OF THE OERROR BITS SET 
i. 44 137 013722 PSRST: GO CHECK THE DATA 
579 ;RETURN PORTION OF SERVICE ROUTINE 
3791 ; CALCULATES g 2 aren net: TO BE READ) 
375 O {SSUES THE READ COMMAND 
79: THER DOES 6 AN RIT PSE ae ein 
tae 015316 015314 SRETRN: ADD 
79) 177660 015316 MOV t- OFFSET 
57% BR sa 
279) 001000 O15314 SRETRi: BIT #001000, S1ZE 
thy BNE SRETRY 
s80C 000120 015316 SRETR3: HOV 120, OFFSET 
580¢ 014650 SRETRY: JSR PC LASTCD ;CHECK FOR MORE THAN 80 CARDS 
280: BGT SRETR3 ; BRANCH IF GREATER 
BC 15314 MOV SIZE. acvC SET UP COLMN COUNT 
2808 442 MOV #BUFBEG , RO “RESET TABLE POINTER 
>B0E MOV RO SCDA SET UP ADDRESS REG 
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OZCDB.P11 DATA RELIABILITY TEST SEQ 0127 

ij - SUBROUTINE TO SET PACKING MODE AND MOVE THE POINTERS FOR THE DATA. 

1 rate 015326 bAKSET: ADD #160., TSTART ;MOVE TABLE POINTER TO PACKED TABLE 

ti —_ #160! , RI suroaTe TABLE E POINTER 

i Bais HO ios Th Re 

; RTS PC 
TO HEADING, TYPE OF OF DECK CARD COUNT, AND COLUMN COUNT 
F 001260 ve "EELS CK FOR FIRST ERROR 


‘BRANCH IF Nor 
;SET FLAG 
-TYPE HEADING FOR DATA ERRORS 


-~ 
- 
> : 


ERELG 
AGI 


= 


ie. 
F NOHEAD: TYPE :OUTPUT TYPE OF DECK 
re: DECK: DUMMY ‘POINTER TO DECK TITLE 
el 030545 TYPE, SPACE 
F 015332 INC  CDCNT ADJUST CADR COUNT 
fe > Ol MoV. CDCNT, -( SP) 
c. TYPDS 
jC 0 DEC CDCNT READJUST CADR COUNT 
, TYPE, 5 
3c Ince’ Le NT ADJUST COLUMN COUNT 
3: 1 HOV CLCNT, -(SP) 
3 c CNT READJUST COLUMN COUNT 
3 bagea3 TYPE, 2 
x RTS ' PC 
38 ; SUBROUTINE TO CHECK FOR LAST CARD 
1598 (astco: MOVs TEMP! 
nt 15324 MOV t, TEMPE 
: LSTCD1: INC 
120 015322 ADD sled, TEMPL 
es nee! 
RTS = wPC 
Me {SUBROUTINE TO KEEP TRACK OF CARDS 
np 34 AXCRD: CLR CLONT ;RESET COLUMN COUNT 
SC CLR § $TMPS 
3} 1 INC  CDCNT ;KEEP TRACK OF CARDS 
5, 000120 CMP  - CDCNT, #120 ;CHECK FOR 80TH CARD 
BGE  SEOP 
RTS = wPC ; RETURN 


3 EEE EE A A A A EE aE EE EE 
.SBTTL END OF PASS ROUTINE 


-*INCREMENT THE PASS NUMBER (SPASS) 
-#TYPE "END PASS #XXXXX” (WHERE XXXXX IS A DECIMAL NUMBER) 


+. 
wd 
> 
«A « 
— 
als 
+ 
»" 
va 
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¢ 
7. 
4 
7. 
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> 
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. 
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ow 
> 
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_) 
7. 
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> 
“4 
> 
wll 
. 
>¢ 
; 
od 
> 
od 
7 
4 
> 
«A 
,. 
4 
’ 
7: 
. 
ad 
+ 
me & 
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nd 
> 
4 
?. 
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— 4. 
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? 
sf 
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«4 
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OZCOB.P11 END OF PASS ROUTINE SEQ 0128 


;#IF SWl2=1 INHIBIT TRACE TRAP 
-#IF THERES A MONITOR GO TO IT 
-#IF THERE ISN’T JUMP TO HOOK1 


SEOP: 


> 
. 7 





TST (SP)+ ;CORRECT STACK POINTER TO REPLACE ‘RTS’ 

3865 CHP (SP)+, (SP)+ ate cT STACK POINTER TO REPLACE ’RTI’ 
: aR Spas: 5 CERO TH MER Oe hiper rons 
587% 001100 BIC #100000 , SPASS ; DON'T ALLOW A NEG. NUMBER 

3870 SEOPCT: .WORD 1 " 

287) BGT SDOAGN : YES 

=O / ecrocT 4 povsy O10G)9 - RESTORE COUNTER 

4-4 _ 

4 Te SEOPCT _ 
586i mov apace G sp) 35 ONE 

288 TYPOS sci 3001 ie 5 FOR “DECIMAL “BSc WITH SIGN 
4: [25 SGETY2: . 

GF MOV ae42, RO at MONITOR ADDRESS 
te BEG . SDOAGN ; | BRANCH IF MONITOR 
BBE AER -(SP) 1 URSURE. t OFT IS CLEAR 
88° MOV NDAD,-(SP)  ;;SETUP FOR AN RTI OR 
289C BR $R ;;G0 DO AN RTI OR RIT 19 LOAD THE PSW 
4:5 ::WITH A CLEARED "T" BIT 
0 JC 
89: MOV 3842, RO : GET MONITOR ADDRESS 
‘3 ey * CLEAR ip map 
589 SENDAD: JSR _—«~PC, (RO) $360 TO MONITOR 
+f NOP ; ;SAVE ROOM 
3, NOP ;;FOR 
Sa Ad NOP -sACTII 
$90} " CLR (SP) ns : RE Q STACK LOC. FOR THE PS 
390 o00034 La SREY 1 eT THE PS 
9 is: Ter (pre . CLEAN OFF THE USED PC 

+, MOV (SP)+,2(SP) i SAVE OFF THE PS 
54 Moy (Spee Re TM Tm BIT 
9} 164016 BIT ae Tt 12, asun 4 “RUN WITH TRACE. TRAP? 

5 CON se1T : Is i TIME FOR TRACE TRAP 

5¢ BIS #20, (SP) -:SET TRACE TRAP 

a 25: MOV wSLO0P,-(SP)  ;;JUMP TO START OF TEST 

+ SRIRN: RTI ; ;RETURN--THIS 15 CHANGED T0 

--AN “RIT” IF “RTT” IS LEGAL . 
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OZCOB.P11 PASS ROUTINE SEQ 0129 


; ; INSTRUCTION 
015170 JMP d8HOOK1 ; ;RETURN 


ga? 198 ngtee SRbne: Casciz <15><12>7END PASS 8/ 


y+: 
be ree 
WD 
=) =) 
ee 
wm 
-_ 
iD 


’ 
— 





END OF 
42 000137 

+. 

e i 

» a 

36; : 000 SENULL: .BYTE -1,-1,0 ;;NULL CHARACTER STRING 

595 Q00040 163740 HOOK1: BIT #40, aSWR CHECK @SWR FOR HALT AT END OF DECK 
296 BEQ ONL INE . CONTINUE IF NOT SET 
90 HALT ‘END OF DECK,SWS SET 
¥,¥ BR DECKCK 
tk 43. 010000 ONLINE: BIT #10000, acDS § ; CHECK FOR OFF-LINE 

393¢ y BEQ —~DECKCK’ ‘BRANCH IF NOT 
293: 13 TST 'CHECK FOR ERROR (BIT 15) 
yk 1 is 'BRANCH IF SET OK 
2936 i BFROR +26 “ERROR BIT 1S NOT SET 
43 rite o40000 1$: BIT #40000, acDs CHECK f: CARD READER ERROR 
sg + “LINE NOT DUE TO CARD READER ERROR 
og. fA? 023471 2S: BIT weN71, 0005; CHECK FoR EXTRA BITS SET 
z 10401 ERROR +15 “EXTRA ERROR BITS SET 
> 

: 015250 , SONINT, 3ADINT NTERRUPT VECTOR 

34y Bbsobi 3: Rit iat FOR AN I T 
gy us WAIT ON TRACE TRAPS 
bays 3 000010 ONINT: BIT #10, @CDS CHECK FOR TRANSITION TO ON LINE 
3950 1001 BNE sd ‘BRANCH IF SET OK , 
395 | i ERROR +36 INTERRUPT BY OTHER THAti BIT 3 SETTING 
396: 022626 1S; CHP (S24, (S24 RESTORE THE STACK 
295 sWHEN CONTINUING FROM’ ONE DECK TO ANOTHER, CHECK SW& FOR TYPE 
5985 istic: ton Tete D TOGGLE FLAG 
595 Booed 163642 BIT #100, aS Tage, Sue 
295 Q i -BRANCH IF NOT SET 
595 1g? 902594 IMP —sRESTRT SRERUN COMBINED INSTRUCTION AND DATA TEST 
0g ; 137 0123! 1s: JMP _—ODATST 
abs g22b26 DATRST: CMP  (SP)+, (SP)+  ;RESTORE THE STACK 
5g 13? 012314 IMP —sDARTST SRESTART DATA TEST 

5g 177660 SIZE:  -120 
3 OFFSET: -120 
*, 0 

+, 1 ; 

3 TSTART: 0 -STARTING ADDRESS OF DATA TABLE 
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C08 OF SE@ 0130 
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FUNCTION TESTS 


-SETUP FOR ERROR FUNCTION TEST 


ERi200: 


64S: 


67$: 


ERCD11: 


eee Mere a etree rere ey ba 


ec. ge earn 
i fur ie 





ACK, SP THE STACK POINTER 
OCT ern FOR SCOPE ROUTINE 
Cc’; Ee FOR ERROR ROUTINE 


$ C LEVEL JECTOR FOR TRAP CALLS 
aos ? 


Cj ;POMER FAILURE VECTCR 
Gre LEME Lae op COUNTER 
srertvec’ aE Ee NUMBER OF 1 TERATIONS 


amare "T" BIT VECTOR 10 RRR 
Age SO TRN TO A RTI 
+ A RTT 


: RTT 
SRTT, SRTRN --RTT IS LEGAL--SET SRTRN TO A RIT 


#10, SP RTT CLEAN OFF THE STACK 
evecee, auneSvet 5 Re {RESTORE TAA Ca TRAP CATC 
STB T” BIT cute 


ifiadz he THE ne ADDRESS FOR SCOPE 


fr #5 ae 


. , SLPADR 
» (SP) 
~(SP) 


seers, Si ri i? NO T OUT TRAP SCCURS 
SD ISPREG aah i SOT SPLAY REG 
"4 a BRROR VECTOR 
4 - MOVE UP ON TTY 
mone Suh ERROR FUNCTION 
‘TESTING OF AN M-1200" 
CD1000 ‘CARD READER IS M-1200 
ERI2CD 
SSCNTAG, Rb .sFIRST LOCATION TO BE CLEARED 
(R6)+ + CLEAR MEMORY LOCATION 
#SBDDAT , Rb ; ; DONE? 
6 ::LOOP BACK IF _NO 
#STACK, SP ; | SETUP THE STACK POINTER 
#SSCOPE. JBIOTVEC ;;IOT VECTOR FOR SCOPE ROUTINE 


#340, ELOTVEC#S LEVEL 


SEQ 0131 


- 11 - OZCD8-8 1 27(654) -77 08:39 PAGE 60 
oe ERROR +1 FUNCTION N TESTS SE@ 0132 
-;EMT VECTOR FOR ERROR ROUTINE 


os 7 
+ VECTOR FOR TRAP CALLS 











MOV 
NOV 
MOV LEVEL 7 
MOV -:POWER FAILURE VECTOR 
HOV ; LEVEL ee 
i CLR rec! STG tr TTERAT IONS 
0. HOV 3 IT RTOR 10 TRN 
C MOV te TO A RTI 
xc MOV $;TRY TO DO A RIT 
: CR y PS 
a , RTT sae THE RTT 
OM HOV ‘RTT IS LEGAL--SET SRTRN TO A RTT 
C ADD 0,SP T ILLEGAL--CLEAN OFF THE STACK 
OM HOV RESVEC#2, asresvit"; ;RESTORE TRAP CATCHER 
1050 MOV sot aR at IZE “he “LOOP ADDRESS FOR SCOPE 
05! HOV (SP ;;SAVE ERROR VE 
05: HOV ae78,4 11857 aa TINE OUT VECTOR _ 
055 aR bes. si NO TIREQUT. TRAP OCCURS 
1057 MOV sorepRt Rte bn TO DISPLAY REG 
05 CMe (SP )4,(SP)+ RE 
10S MOV  (SP)+, 986 STORE ERROR VECTOR 
1 TYPE sipoce CATE ” ERROR FUNCTION 
ROK OF AN DOO REDO" 
ERI2CD: MOV : 3 RETURN ae : HY FOR GATS 
; ; FOR POUR FAILURE RETURN 


ERCD12: TYPE, Cres ; ; TYPE itt ine SRV. LEVEL 


j SRSERRERORERNEO EDS SHASEEURSSERPESEERE TERE SRES ESSE SSEEIECHNONET® 


;#TEST 33 TEST DATA LATE 
© 6 3-Sb36 E 9-96 SS a HH EE E 


+5733: 


: SCOPE 
; HALT CAUSE DATA LATE ERROR (BIT 10) 
iCROULD SET ERROR (BIT 15) 
JSR PALF INIT -INITIALIZE STATUS REGISTER 
; TST33 DATA _LATE TEST 


TYPE, 
TYPE, MSGee PRINTING STOPS PUT HALT _AND 
: BUS CYCLE DOWN I 


pn, a, pm, i, el ee — 
ae be be oe Oe Oe OE 
a a Fn on oO OP FR PX 


>.0t 


> 


- 
i 
=x 
z 
fs 
: 
m 


TYPE, CRLF-3 *MOVE MESSAGE UP ON TTY 


se ee - jj - <r MACY11 27(654) 
0ZCOB.P 


| + iris 7a 










be ee be he Pe 


WWWWIG 


fee Fone [bee eee pee pee De Ge ee =o = = 


" 
he 
| 


eb 





TEST DATA LATE 


— 075577 
l 
016250 
744 
75 
is 
010000 







re aS 


000010 
l 
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° aE 
tsT 


MOV #BUF BEG, aCDA 
HALT 
INC acDs 
TSTB 436s 
1S 

+23 
TST acDs 
BNE 2 
ERROR +26 
BIT #2000, acDs 
BNE 3$ 
ERROR +42 


-SET UP COLUMN COUNT 
;SET UP BUS ADDRESS 
START READING 
*CHECK FOR CONTROLLER READY 
: BRANCH IF T OK 

READY FAILED TO SET 
: CHECK “a ( BIT 15) 
BRANCH IF SE7 OK 
“ERROR BIT 15 NOT SET 
CHECK FOR DATA LATE ERROR (BIT 10) 
‘BRANCH IF SET OK 
-DATA LATE BIT 10 NOT SET 
sCHECK FOR ANY OTHER BITS 
BRANCH IF 


, -EXTRA BITS SET IN STATUS WORD 


SHELAGH EGER ERE EERE EERE REAR EEE LEE RARER ARERR RE LE 


ATES 34 TEST ERROR AND OFF L 
AE EEE SE SEE EAE EE EE 


LINE BIT 
MME HEME SESE SE SESE AEE EE MEH HEE MEE EEE EEE AEE EEE REE EE 


CARD GOING OFF-LINE SHOULD SET ERROR (BIT 15) 
AND OFF-LINE (BIT 12) 


“GOING BACK ON L 
JSR PC, INIT 
Tyee, 
TYPE, MSGe 
TYPE, CRLF-3 
HALT 
BIT #10000, acDs 
+43 
1S: TST acos 
BMI 2s 
ERROR +26 
2s: BIT 3CDS, #067577 
E +15 
2S: TYPE,  MSG1 
TYPE, MS 
TYPE, CRLF-3 
HALT 


LINE aa SET "T TION TO_ON-LI (BIT 3) 
INITIALIZE STATUS REGISTE 


aan. STER 


‘TST34 OFF-LINE 
” SS 9 oe 


READER 
mT HIT ’CONTINUE’ ON THE CONSOLE" 
sMOVE MESSAGE UP ON TTY 


“CHECK BIT le 
; BRANC 

“OFF-LINE (BIT 12) WASN’T SET 
-CHECK BIT 15 
: BRANCH H IF SET 

-ERROR (BIT 15) WASN’T SET 
-CHECK FOR EXTRA BITS 


. IF OK 
-STATUS WORD ERROR 


-"PRESS CARD READER ’RESET’™; 
:"THEN HIT ee vey THE CONSOLE” 


“MOVE MESSAGE UP ON T 


CHECK FOR TRONSITON TO ON-LINE(BIT 3) 
- TRANSITION TO ON-LINE FAILED TO SET 


SEQ 0133 









Ell 
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COB.P11 T34 TEST ERROR AND OFF LINE BITS SEQ 0134 
4§: 


3138 016354 032713 010000 BIT #10000, aCDS ;CHECK FOR OFF-LINE 
tae 1401 BEo S$ ; BRANCH uF eee 
4 1 ERROR +44 ;OFF-LINE STILL SET 


005713 SS: TST aCDS ;CHECK ERROR (BIT 15) 
1 ] BMI 6$ ; BRANCH ar a 
1 ERROR +26 ;E BIT 1S CLEARED 


= 


077567 6S: BIT ¥077S567,9CDS § ;CHECK FOR EXiRA BITS 
BEQ 7$ : IF OK | 
ERROR +15 “EXTRA STATUS BITS SET 
jSEREMNSERSEEEERERA PEREREEEAEEHSEREEOLEREESEEEEEEEEEESEREEEES 
- TRYING TO READ WHEN CARD READER IS OFF-LI SHOULD. CAUSE AN INTERRUPT 
ee ERD WRERRUPT OCCURS KEN. THE CARD COMES ON LINE 
025744 JSR PC. IN INITIALIZE STATUS REGISTER 
016652 #TINTC, eagINT : LOAD RETGRN POI 
THE FOLLOWING SENTS THE EQUIVALENT OF “BIS #340,PS” 


~(SP) :3 

34 (SP) ::SAVE CURRENT TRAP VECTOR 

#645, :SETUP NEW TRAP VECTOT 

- PUSH OLD PSW AN PCON STACK 

o00006 64S: MOV 2(SP) .6(SP) : 
#65S, (SP) 


F 
: 


: 
: 


ere pet ee ee st ba pees be bem ae me een ee Bee er eee Be ee ee ee ee eek ee ee Re Re pe 


VRZIN-SSEVERIGH-ESSVERLGH- ESSN 





16446 werkt OLD PC WITH NEW 
34 65S: (SP)+ 34 es >:RESTORE OLD TRAP VECTOR 
001214 BIS #340, STMP6 
1214 “OV STMPb, -(SP) : s PUT NEW ®S ON STACK 
164 MOV #66$ , -(SP) - PUT PC ON STACK 
om RTI -: POP NEW PC AND PS 
i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 
1 900034 MOV 34. -(SP) ‘SAVE CURRENT TRAP VECTOR 
ee a, (aren ET OLD PW AN PCON STACK 
1 gage O00006 67%:  # MOV 2(SP) .6(SP) : 
1 1 NOV #69$, (SP) ia opi REPLACE OLD PC WITH NEW 
1 990034 68S: MOV (SP)+,34 * RESTORE OLD TRAP VECTOR 
1 MOV (SP)+. 2(ADINT) 
i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIC #340,PS” 
1 900034 MOV 34. -(SP) ::SAVE CURRENT TRAP VECTOR 
1 16 000034 MOV #655, 34 :: SETUP NEW TRAP VECTOT 
i ppo0ns 69S: MOV 2(SP),6(SP) ro a i cee ere 
! BESTS : Nov #70$, (SP) " pestort eee OLD PC WITH NEW 
31 000034 70$: MOV (SP)+, 34 ne ::RESTORE OLD TRAP VECTOR 


F1l 
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OZCOB.P11 TH TEST ERROR AND OFF LINE BITS SEQ 9135 


18 HID BOE GR cory Tee oy se 
3 Bere Biee22 HOV #71$,-(SP) PUL New PE On STACK 
MOV 





718: 
& acDs 
OhEZAR Baed8q Telae SeEcTA TNT COND. TEST 
Gaoee6 TYPE? -3 ME UP he 
1 TLOPC: BIT #10000, acDS OVE FOR OFF-LINE TO SET 
BEQ TLOPC 
BR CONTC -SKIP INTERRUPT HANDLER 
104021 TINTC: ERROR +21 STOP’ SHOULDN’T CAUSE AN INTERRUPT 
000002 RTI - RETURN inom THE INTERRUPT 
713 CONTC: TSTB  acDS ;CHECK CONTROLLER READY BIT 7 
, is BRANCH IF OK 
10402 ERROR +23 -CU READY DIDN’T SET YET 
713 1S: TST acDs :CHECK ERROR BIT 
1 BMI 2$ : I 
1 ERROR +26 sERROR (BIT 15) NOT SET 
3 067477 25: BIT #067477,aCDS § ;CHECK FOR EXTRA BITS 
1401 BEQ 3$ ‘BRANCH IF OK 
ERROR +4 -STATUS WORD ERROR 
33: MOV #TINTCA QDINT ;LOAD RETURN POINTER | 
i THE FOLLOWING REPRE SENTS EQUIVALENT OF “BIS #340,PS” 
MOV 34 (SP) cave CURRENT TRAP VECTOR 
000034 MOV #645, :: SETUP NEW TRAP VECTOT 
TRAP ;;PUSH OLD PSW AN PCON STACK 
000006 64S:  #$MOV 2186) 186 &(SP) . 
MOV Sp) - REPLACE OLD PC WITH NEW 
RTI : sRESTORE PSW 
65S: MOV (SP)+,34 | * RESTORE OLD TRAP VECTOR 
(SP)+:STMPG 
001214 BIS #340, STMPS 
MOV sii, -(SP) : PUT NEW PS ON STACK 
HOV $,-(SP) “PUT NEW PC ON STACK 
ial RTI :? POP NEW PC AND PS 
i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 
MOV 34. -(SP) SAVE CURRENT TRAP VECTOR 
000034 MOV 3095. 34 SETUP NEW TRAP ROECTOT 
TRAP tt BSH OLD PSW AN PCON STACK 
Q00006 67S:  #$ MOV 2(SP). 6(SP) . 
MOV #68S, (SP) “REPLACE OLD PC WITH NEW 
RTI ; ;RESTORE’ PSW 





68$: MOV (SP)+,34 ;;RESTORE OLD TRAP VECTOR 
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TEST ERROR AND OFF LINE BITS 


001214 


71S: 


TINTCA: 


1$: 


2$: 


38: 


64S: 


65S: 


66S: 


Gli 


08:39 PAGE 64 


MOV (SP)+, 2(ADINT) 
éLR of 

MOV 34. -(SP) 

MOV #695, 34 

TRAP 

MOV 2(SP).6(SP) 
HOV 70S, (SP) 

MOV (SP)+,34 

MOV (SP)+’ STMP6 
BIC #340, $TMP6 
MOV STMP6, -(SP) 
MOV #71$,-(SP) 
RTI 

INC acos 

BR : 

CMP (SP)+, (SP)+ 
STB acs 

ERROR +23 


BEQ 
ERROR +4 


MOV #TINTCB 

- THE FOLLOWING 

éLR -(SP) 

MOV 34. -(SP) 
MOV #64S, 34 
TRAP 

MOV 2(SP).6(SP) 
MOV #65S, (SP) 
RTI 

MOV (SP)+, 34 
MOV (SP)+.STMP6 
BIS #340, STMP6 
MOV STMP6, -(SP) 
HOV #66S, -(SP) 


LR 


“THE FOLLOWING REPRESENT 
L -(SP) 


- THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIC #340,PS" 


 TCAVE CURRENT TRAP VECTOR 
::SETUP NEW TRAP VECTOT 
->PUSH OLD PSW AN PCON STACK 
se . 5 OLD PC WITH NEW 
; ;RESTORE PSW 

>:RESTORE OLD TRAP VECTOR 


::PUT NEW PS ON STACK 
--PUT NEW PC ON STACK 
:: POP NEW PC AND PS 
-TRY TO READ A CARD 
‘WAIT FOR THE INTERRUPT 
sRESTORE THE STACK 
‘CHECK CONTROLLER READY BIT 7 
‘BRANCH IF OK 

:CU READY DIDN’T SET YET 
i CHECK FOR OFF-LINE BIT 12 
OFF-LINE BIT 12 NOT SET 
CHECK ERROR BIT 
-BRANCH IF SE 

“ERROR (BIT 15) NOT SET 
CHECK FOR EXTRA BITS 


: F OK 
;STATUS WORD ERROR 


INT ;LOAD RETURN POINTER 
SENTS THE EQUIVALENT OF “BIS #340,PS” 


Si cove CURRENT TRAP VECTOR 
--SETUP NEW TRAP VECTOT 
PLUSH OLD PSW AN PCON STACK 


i . ;REPLACE OLD PC WITH NEW 
: s RESTORE PSW 
* sRESTORE OLD TRAP VECTOR 


: PUT NEW PS ON STACK 
::PUT NEW PC ON STACK 
POP NEW PC AND PS 


S THE EQUIVALENT OF “MOV PS,2(ADINT)” 


*e 
s? 


SEQ 013€ 


inate, 
Hil 
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O2C0B8.P 11 SEQ 0137 


T TRAP VECTOR 








330C 013746 000034 MOV 34. -(SP) 
3 0 017262 000034 MOV #675, 34 Hai SETUP NEW IR yt CTOT 
307 TRAP BN BEON STACK 
308 "7 NOY steph ” ACE OLD PC WITH NEW 
308 RTI . ;;REST Tore’ aot 
0 68S: MOV (SP)+,34 -sRESTORE OLD TRAP VECTOR 
30 MOV (SP)+’ 2(ADINT) 
301 i THe FOLLOWING REPRESENTS THE smoaine OF “BIC #340,PS” 
31C MOV 34.-(SP) t cave CURRENT TRAP VECTOR 
31 000034 MOV #69S, 34 +1 SETUP NEW TRAP VECTOT 
‘. TRAP ‘PUSH OL! PSW AN PCON STACK 
a p00006 69S: MOV 2 (Sp) (SP) 7 
k MOV #70$, (SP) -REPLACE OLD PC WITH NEW 
gis RTI . s RESTORE’ PSW 
k 70$: MOV (SP)+, 34 - RESTORE OLD TRAP VECTOR 
} MOV (SP)+' STMPE 
316 001214 BIC #340, STNPE, 
kA MOV STNPE -(SP -:PUT NEW PS ON STACK 
get MOV #715, rTSp) ;;PUT NEW PC ON | STACK 
32 al RTI :: POP NEW PC AND PS 
Se TYPE, MSGI “PRESS CARD READER *RESET?” 
324 TYPE, CRLF-3 “MOVE ME UP ON TTY 
355 BR ;WAIT FOR THE INTERRUPT 
ky TINTCB: CMP (SP)+, (SP)+  ;RESTORE THE STACK 
set BIT #10, aCDS § ;CHECK FOR TRANSITION TO ON-LINE(BIT 3) 
es BNE 1$ IF SET OK 
ey ERROR +36 “TRANSITION TO ON-LINE FAILED TO SET 
1336 18: BIT #10000, acDS §_;CHECK FOR OFF-LINE 
k Q IF OK 
33 ERROR +44 ‘OFF-LINE STILL SET 
33 25: IST DS : CHECK ERROR (BIT ofS? 
’ 4 
133 ERROR +26 TERROR LBIT 15 CLEARED 
Ent 4 213 077467 3$: BIT  8077467,aCDS  ;CHECK FOR EXTRA BITS 
kn} 401 Beg =sS : IF OK 
‘ 104015 ERROR +15 ‘EXTRA STATUS BITS SET 





4§: 
: SEOURGREOEAUSDESEISEESSEIMESE IERIE 


;*¥TEST 36 HOPPER EMPTY 
© S63 A SEE HSE MEE SEE HEE SEE SEE SEE A SE HE SEE EE HE EAE HEME EEE REE ER EES 


“INPUT HOPPER & 
: CHECK THAT INTERRUPTS OCCUR WHEN 
JSR PC. INIT 


MPTY SHOULD SET SPECIAL CONDITION 


TYPE, 
TYPE,  MSG5 


CARD OMES ON LINE 
s INTTIAL IEE STATUS MG GES TER 
-TST36 HOPPER EMPTY TEST 
-“REMOVE ALL CARDS FROM THE INPUT HOPPER” 
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TEST INPUT HOPPER EMPTY 


031632 
030550 


010000 
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65$: 


66S: 


695: 


70S: 


TYPE MSGe 

TYPE CRLF-3 

Ha 

BI #10000, aCDS 
BNE 1$ 

ERROR +43 

TST acos 

BMI es 

ERROR +26 

BIT #40000, aCDS 
BNE 3$ 

ERROR +35 


nTHE FOLLOMING REPRESENTS THE BGUTVALEN ENT OF 


;"THEN HIT A hea. i 7 THE CONSOLE” 
;MOVE MESSAGE UP ON T 
;CHECK BITle 
‘BRANCH IF SET 

“OFF-LINE (BIT 12) WASN’T SET 
;CHECK ERROR BIT 
;BRANCH IF SET 

sERROR (BIT 15) NOT SET 


“CHECK FOR CARD READER ERROR 
‘BRANCH IF SET 


“CARD READER ERROR BIT 14 NOT SET 


“CHECK FOR EXTRA BITS 
: BRANCH 
sSTATUS WORD ERROR 


“BIS #340,PS” 


éLR 
MOV sa (SP) cave CURRENT TRAP VECTOR 
MOV ee ‘SETUP NEW TRAP VECTOT 
TRAP ;;PUSH OLD PSW AN PCON STACK 
MOV 2(SP).6(SP) tt 
MOV #65, (SP) sREPLACE OLD PC WITH NEW 
RTI . «RESTORE: PSW 
MOV -;RESTORE OLD TRAP VECTOR 
ay i tae Sips 
MOV ;;PUT NEW PS ON STACK 
MOV #665, 1TeR) ::PUT NEW PC ON STACK 
RTI :: POP NEW PC AND PS 
i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS, 2(ADINT)” 
MOV 94. -(SP) tTSAVE CURRENT TRAP VECTOR 
MOY 7$,34 +s SETUP NEW TRAP VECTOT 
TRAP $3 OLD PSW AN PCON STACK 
MOV 2(SP). 6(SP) 
MOV #68, (SP) *REPLACE OLD PC WITH NEW 
RTI . s RESTORE’ PSid 
MOV (SP)+,34 sRESTORE OLD TRAP VECTOR 
MOV (SP)+. 2(ADINT) 
i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIC #340, FS” 
MOV 34. -(SP) SAVE CURRENT TRAP VECTOR 
MOV #695, 34 “SETUP NEW TRAP VECTOT 
TRAP : PUSH OLD PSW AN PCON STACK 
MOV 2(SP). 6(SP) : 
#70, (SP) -:REPLACE OLD PC WITH NEW 
; RESTORE Pal 


(SP)+, 34 


“RESTORE OLD TRAP VECTOR 
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TEST INPUT HOPPER EMPTY 
001214 MOV (SP)+. STMP6 
001214 BIC #340, § 
pojet4 STMPL, -(SP) 
71$: 
MOV #100,  acDs 
TYPE,  MSG6 
TYPE, MSG! 
TYPE, CRLF-3 
BR : 
TINTD: CMP (SP)+. (SP)+ 
MOV #TINTDA, AADINT 
-THE FOLLOWING REPRESENT 
eLR -(SP) 
MOV 34. -(SP) 
MOV #695, 34 
TRAP 
b4$: MOV 2(SP) .6(SP) 
Nov #65, (SP) 
655: MOV (SP)+,34 
MOV (SP)+' STMPG 
BIS #340, STMPE 
MOV STMPb, -(SP) 
MOV #66$, -(SP) 
RTI 
665: 
- THE FOLLOWING REPRESENT 
aLR -(SP) 
MOV 34. -(SP) 
MOV #675, 34 
TRAP 
67$: MOV 2(SP),6(SP) 
HOV #685, (SP) 
68S: MOV (SP)+,34 
(SP)+.2(ADINT) 
eLR =( 
MOV 34. -(SP) 
MOV #695, 34 
TRAP 
69%: MOV 2(SP).6(SP) 
NOV #70$, (SP) 
70$: MOV (SP)+, 34 
MOV (SP)+' STMPG 
BIC #340, $TMPE 
MOV STMP6, -(SP) 
MOV #715, -(SP) 
RTI 
713: 


SEQ 0139 


RE 
; SSAGE UP _ON TTY 
sWAIT FOR THE INTERRUPT 


; RESTORE THE STACK 
“LOAD RETURN POINTER 
OTHE EQUIVALENT OF "BIS #340,PS” 


:icavVE CURRENT TRAP VECTOR 
-: SETUP NEW TRAP VECTOT 
BUSH OLD PSW AN PCON STACK 


ha -:REPLACE OLD PC WITH NEW 
: sRESTORE PSW 
- RESTORE OLD TRAP VECTOR 


-:PUT NEW PS ON STACK 

--PUT NEW PC ON STACK 

-: POP NEW PC AND PS 

S THE EQUIVALENT OF “MOV PS,2(ADINT)” 


Fave CURRENT TRAP VECTOR 
- SETUP NEW TRAP VECTOT 
» PUSH OLD PSW AN PCON STACK 


8 
-:REPLACE OLD PC WITH NEW 
. RESTORE PSW 

: RESTORE OLD TRAP VECTOR 


:: SAVE CURRENT TRAP VECTOR 
: SETUP NEW TRAP VECTOT 
:*PUSH OLD PSW AN PCON STACK 


ts: .:REPLACE OLD PC WITH NEW 
; sRESTORE PSW 
;sRESTORE OLD TRAP VECTOR 


MOV | 
. THE FOLLOWING REPRESENTS THE EQUIVALENT OF "BIC #340,PS” 
4s 


-;PUT NEW PS ON STACK 
--PUT NEW PC ON STACK 
-» POP NEW PC AND PS 


K1l 


MAINDEC - 11 - = MACY11 27(654) 1-JUL-77 08:39 PAGE 68 








0ZC08.P11 TEST INPUT HOPPER EMPTY 
abe 177701 MOV 8-77, acDC  ;SET UP COLUMN COUNT 
o4s442 MOV BBUFBEG,3CDA = ; SET _UP BUS ADDRESS 
Ne a, = BAG? PBRARAPnreRRUPT 
TINTDA: CMP (SP) +, (SP)+ ear THE STACK 
—— Gro 1$ — BRANCH IF eee ape aeen SNS 
? ERROR +4 CARD READER STATUS ERROR 
1S: 
= 33 2 AEE EA EE EE ER EEE 
:4TEST 37 TEST OUTPUT STACKER FULL 
eS 
OUTPUT STACKER FULL SHOULD SET BITS 1S, 14, 12 
A: JSR. —- PC, INIT NITIALIZE sTAtuS REGISTER 
76 TYPE,  MSG36 igre TACKER FULL TEST 
4B TYPE, MSG7 ( BuTPUT STACKER PRESSURE ARM 
481 ALL THE WAY 
48¢ TYPE, MSG TEN HIT CONTINUE’ ON THE CONSOLE” 
48. TYP E, CRLF-3 <MOVE MESSAGE UP ON 
ae 
IT #10000, 3CDS CK OFF-LINE BITi2 
48 i§ iGRANCH IF SET 
Al ERROR +43 r OFF-LINE (BIT !2) WASN’T SET 
uae 
1S: TST CK ERROR IT 15 
x ; a i BRANCH IF 
ERROR +26 TERROR BIT 15 NOT SET 
25: BIT #40000, aCDS | ;CHECK FOR CARD READER ERROR 
‘BRANCH IF SET 
ERROR +35 ‘CARD READER ERROR BIT 14 NOT SET 
3S: BIT 4027577,9CDS § _;CHECK FOR EXTRA BITS 
BEQ ug ‘BRANCH IF 
ERROR +15 -STATUS WORD ERROR 
4S: MOV TINTE, DINT “LOAD RETURN POINTER 
i THE FOLLOWING REPRE SENTS THE EQUIVALENT OF “BIS #340,PS” 
MOV 34, -(SP) t cave CURRENT TRAP VECTOR 
MOV se45, 34 ; j SETUP SETUP NEM, IR TRAP VECTOT 
TRAP ; ;PUSH AN PCON STACK 
64S: MOV 2(SP).6(SP) 
MOV #65$, (SP) REPLACE OLD PC WITH NEW 
RTI . « RESTORE’ poy 
653: MOV (SP)+, 34 ; RESTORE OLD TRAP VECTOR 
MOV (SP)+’ STMPG 
001214 BIS 
MOV STMP6 , -(SP) - PUT NEW PS ON STACK 
MOV 66S, -(SP) ;}PUT NEW PC ON | STACK 
RTI :: POP NEW PC AND PS 


= 
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67$: 


695: 


70S: 


71S: 


TINTE: 


64S: 


65S: 


665: 


67$: 


Lil 
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ACKER FULL 


>THE FOLLOWING a, THE EQUIVALENT OF “MOV PS,2(ADINT)™ 


-(SP) 

cL 34. -(SP) RAP VECTOR 

MOV #675, 34 Pir SETUP Nes TRAP CTOT 

TRAP ; ;PUSH STACK 

MOV 2(SP).6(SP) . 

MOV #69, (SP) vee OLD PC WITH NEW 

RTI 3 RESTORE Fu 

MOV (SP)+,34 RES (ORE OLD TRAP VECTOR 
MOV (SP)+; 2(ADINT) 

jt FOLLOWING REPRESENTS THE ome OF “BIC #340,PS” 

MOV 34. -(SP) CAVE CURRENT TRAP VECTOR 

MOV #69S, 34 :: SETUP NEW TRAP VECTOT 

TRAP ;;PUSH OLD PSW AN PCON STACK 

MOV 2(SP),6(SP) 3 

MOV #70, (SP) -REPLACE OLD PC WITH NEW 
RTI RESTORE’ PS 

MOV (SP)+,34 RESTORE OLD TRAP VECTOR 
MOV (SP)+) STMPS 


3 
3 


MOV STMP6, - (SP) i sPUT UT NE FE WPS ON STACK 

MOV #71$,-(SP) ; ;PU STACK 

RTI AND PS 

MOV #100,  acDds - ENABLE 

TYPE,  MSG1 Sure READER 'RESET’” 
TYPE, CRLF-3 t MOVE MESSAGE UP ON TTY 

BR ‘WAIT FOR THE INTERRUPT 

CMP (SP)+. (SP)+  ;RESTORE THE STACK 

MOV. ___ STINTEA,@ADINT :LOAD RETURN POINTER ; 
j THE FOLLOW NG Sens THE EQUIVALENT OF “BIS #340,PS 
86h + SAVE CURRE cern 

TRAP i : PUSH tes BN PEON STACK 

MOV 2(SP).6(S5P) 

MOV #65, (SP) -REPLACE OLD PC WITH NEW 
RTI -spestond’ PSW 

MOV (SP)+,34 - RESTORE OLD TRAP VECTOR 
MOV (SP)+ STNP6 

BIS #340, STMP6 

MOV STMP6, -(SP) ::PUT NEW PS ON STACK 

MOV #665, -(SP) ; PUT NEW PC ON STACK 

RTI -: POP NEW PC AND PS 

i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS, 2(ADINT)” 
MOV 34. -(SP) : cave CURRENT TRAP VECTOR 

MOV i635 34 :: SETUP NEW TRAP VECTOT 

TRAP ::PUSH OLD PSW AN PCON STACK 

MOV 2(SP) ,6(SP) 3 


SEQ O14i 
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010000 


v06010 


000034 
oooo06 


001214 
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MOV #68S, (SP) 


RTI 

bes: BY $8633 Blan mnt 
- THE FOLLOM OWING REPRESENT 
éLR 
MOV 4 oP SP) 
MOV #695, 34 
TRAP 

69S: MOV 2(SP).6(SP) 
Hoy #708, (SP) 

70S: MOV (SP)+, 34 
MOV (SP)+. STMP6 
my Sits 
HOV 718 2(SP). 
RTI 

71S: anes io so0e 
MOV BEG, 
INC stds 
BR 

TINTEA: CMP (SP)+. (SP)+ 
CMP #000300, aCDS 
BEG is 
ERROR +4 


- REPLACE OLD PC WITH NEW 
: sRESTORE PSW 
;;RESTORE OLD TRAP VECTOR 
S THE EQUIVALENT OF “BIC #340,PS” 
cave CURRENT TRAP VECTOR 
Hag NEW TRAP VECTOT 
‘PUSH OLD PSW AN PCON STACK 
ie REPLACE OLD PC WITH NEW 


: RE RESTORE’ : oe 
STORE OLD TRAP VECTOR 


psPUT Nee OS Sie 


ee NEN nD srk 


sa E CARO READER STATUS 


CARD READER STATUS ERROR 


1§: 
s Penagnanesnenneeneneasseeneseon arian + THensessnesesseeneseees® 


: ¥TEST CHECK 
rn 


iy CK Hite “FEED BIT 15, BIT 14, AND BIT 
aint utr Hp 
AND PL A NG iT Ey a F 


1$: 


ie 


TYPE, MSGl 
a CRLF-3 

HALT 

BIT #10000, aCOS 
BNE 1§ 

ERROR +43 


BIT #10, aCDS 
BEG i$ 





12 
MECHANISM FAILS TO DELIVER A CARD TO 


IN HALF 
"INPUT HOPPER 


it T4O pre CHECK CARDS FROM THE 


‘OF THE 
See ese 
“MOVE ME UP ON TTY 


;CHECK FOR OFF-LINE 
F SET 


: I 
sOFF LINE NOT SET AFTER “CONTINUE” 


-CHECK FOR “TRANSITION TO ON LINE” 
-WAIT FOR IT 


eat iy GE eS HE 


SEQ 0142 


mo = 











ad 








Nil 
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0ZCD8.P11 T4O TEST PICK CHECK ERROR SEQ 0143 
140210 CMP #140210,2C0S § ;CHECK FOR CORRECT STATUS BITS 
BEQ 28, BRANCH IF OK 
ERROR +4 -STATUS NOT EQUAL TO 140210 
7770: 25: MOV 8-77,  @acDC  ;SET UP COLUMN COUNT 
5ag442 MOV SBUFBEG,3CDA = ;SET UP BUS 
3s. feo 3003 ar roan 
3$ A SO CONTROLLER RREADY 
010000 I #10000, acd : i 
ERROR +43 1 SET (BIT 12) WASN'T SET 
4g: TST CHECK SPECIAL CONDITION BIT 
a i GRRNCH IF SET 
ERROR +26 SPECIAL CONDITION NOT SET 
Ss: BIT #40000, acDS HE FOR CARD READER ERROR 
+ BRANCH TF RD READER ERROR BIT 14 NOT SET 
6S: TST 3CDDB ; TEST BITIS OF STATUS REGISTER #2 
BPL 7§ ; iF NOT NDICATING 
020000 160064 IT , @CDDB CATOR SET? 
gy ygooon,acone FI 
‘PICK CHECK BIT13 NOT SET 
027577 7S: T QCDS, #027577 =; CHECK _FOR EXTRA BITS 
os » BRANCH 
+] :STATUS WORD ERROR 
021424 10S: STINTF, L RETURN POINTER 
ine FOLLOWING REPRESENTA ORE Fou OF “BIS #340,PS” 
990034 MOV 34 (SP) : cave CURRENT TRAP VECTOR 
l2 000034 MOV : ii Be TUP NEW TRAP VECTOT 
TRAP . OLD PSW AN PCON STACK 
990097 000006 64S: #§ MOV 2:5) 186 (SP) + 
s OLD PC WITH NEW 
it ; ;RESTORE 
65S Bit: a4 RESTORE OLD TRAP VECTOR 
Se a 
$ mid : :PUT 
nov #66$, -(SP) : PUT UT ei Pe oh 3th 
al RTI 5 
: ite FOLLOM NG REPRESENTS. THE sehie tpn OF “MOV PS,2(ADINT)” 
990938 MOV 4 (SP) ; | SAVE TRAP VECTOR 
l 000034 MOV #67$, 34 ae er TRAP SECTOT 
TRAP ; ;PUSH AN PCON STACK 
po0002 000006 67S: NOV 2(SP),6(SP) 





Bic 
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Sec Pi rs TEST PICK CHECK ERROR SEQ O144 









021310 MOV #685, (SP) --REPLACE OLD PC WITH NEW 
: RTI : =RESTORE PSid 
SAC MOV (SP)+,34 ;:RESTORE OLD TRAP VECTOR 
i MOV (SP)+,2(ADINT) 
ite FOLLOM NG REPRESENTS THE EQUIVALENT OF “BIC #340,PS" 
MOV 34. -(SP) :SAVE CURRENT TRAP VECTOR 
MOV 9698, 34 SETUP NEW TRAP VECTOT 
TRAP ::PUSH OLD PSW AN PCON STACK 
MOV 2(SP) .6(SP) es 
MOV 8708, (SP) --REPLACE OLD PC WITH NEW 
RTI : RESTORE Pou 
MOV ($P)+, 34 >:RESTORE OLD TRAP VECTOR 
MOV (SP)+) STMP6 
001214 BIC #340, STMP6 
MOV STMPb, -(SP) -:PUT NEW PS ON STACK 
#71$, -(SP) jsPUT NEW PC On STACK 
sie RTI : NEW PC AND PS 
MOV 8100, acoS  ;SET 
TYPE, nece iSrestone canos 10° INPUT HOPPER” 
TYPE, MSG1 "PRESS CARD "RESET’” 
TYPE, CRLF-3 “MOVE MESSAGE UP ON TTY 
BR “3WAIT FOR THE INTERRUPT 
TINTF: CMP (SP)+, (SP)+  ;RESTORE THE STACK 
MOV STINTEA @ADINT ES RETURN POINTER 
jhe FOLLOMID SENTS THE EQUIVALENT OF “BIS #340,PS” 
MOV 34. -(SP) ::SAVE CURRENT TRAP VECTOR 
000034 MOV #648, 34 :: SETUP NEW TRAP VECTOT 
TRAP ::PUSH OLD PSW AN PCON STACK 
000006 64S: MOV (SP) (SP) : 
MOV , (SP) -:REPLACE OLD PC WITH NEW 
RTI : sRESTORE PSW 
65$: MOV (SP)+, 34 RESTORE OLD TRAP VECTOR 
MOV (SP)+. STMPG 
001214 BIS $340, $1 
MOV § » 7 (SP) -:PUT NEW PS ON STACK 
MOV #66$, -(SP) : PUT NEW PC ON STACK 
‘ae RTI :: POP NEW PC AND PS 
i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 
900034 MOV 34. -(SP) ::SAVE CURRENT TRAP VECTOR 
l 000034 MOV #67S, 34 : > SETUP TRAP VECTOT 
TRAP : « PUSH PSW AN PCON STACK 
ggogge 000006 67$: MOV 2(SP).6(SP) 7 
1 MOV #68S, (SP) js REPLACE OLD PC WITH NEW 
RTI : s RESTORE 
300034 68S: MOV (SP)+, 34 -:RESTORE OLD TRAP VECTOR 
MOV (SP)+.2(ADINT) 
- THE FOLLOWI 


No REPRESENTS THE EQUIVALENT OF “BIC #340,PS” 


Ps 
-; 
x 


Cl 
seh = 11 = DZCpO-B OGYIA e7cGSN) JaJi-77 08:33 PAGE 73° 


34, - (SP) 


MOV 
000034 HOV #695, 34 
p00006 69S: ## MOV 2(SP).6(SP) 
HOV $708, (SP) 
70$: §§ MOV (SP)+, 34 
001214 BIC suo. lg PE 
MOV STMP6, - (SP) 
MOV #71, -(SP) 
RTI 
7s: ov 8-77, BCDC 
MOV $BUFBEG, aCDA 
INC acos 
BR s 
TINTFA: CMP (SP)+. (SP)+ 
CMP #0003/0 , 
BEQ 1§ 
ERROR +4 





ey . :REPLACE OLD PC WITH NEW 
: sRESTORE PSW 
* sRESTORE OLD TRAP VECTOR 


;;PUT NEW PS ON STACK 
5 PUT NEW PC ON STACK 
;; POP NEW PC PS 


‘BRANCH IF OK 
CARD READER STATUS ERROR 


42: 

; LHELLELRP ELL ELLER SELERELRARLEERERELESERSERSEEE LER ERE ARE RE RE ELE RE 
seTEST 41 TEST STACK CHECK 

© LEEK HKLHKLS RERAAAHERESS REESE RE KAGE EGKRERAE RARE RL KAA AELHRR AR ELE 





tSTY1: 
A STACK CHECK ERROR SET. BIT 1S, BIT 14, AND BIT le 
: THIS THE FEED MECHANISM FAILS TO DELIVER A CARD TO 
: THE READ STATION 
JSR PC. INIT 
TYPE, -TST41 STACK ERROR TEST 
TYPE, -* READER ’STOP’” 
TYPE, MSG9 -"SLT A CARD FROM THE OUTPUT HOPPER ABOUT 
: INCH INT READ HEAD 
BL ING THE PHOTO 
id 
: KiNG ACCESS 0 Lad PHOTOCELL 
: 
: By TEARING Q SOE TECE OF 
: NG IT IN oA BI TE PMOTOPELL 
TYPE, .* CARD READER "RESET? 
TYPE, CRLF-3 . 2 UP ON TTY 
TLOPG: BIT #10000, aCDS ; CHE Lite 
BEQ TLOPG ;WAIT FOR OFF-LINE 
TLOPGA: BIT #10 JCDS  ;CHECK FOR "TRANSITION TO ON LINE” 
BEQ OPGA gWALT FOR IT 
CMP #i00210,9CDS  ;CHECK FOR CORRECT STATUS BITS 
BEQ § ‘BRANCH IF OK 
ERROR +4 -STATUS NOT EQUAL TO 100210 
1S: MOV 8-77,  acoc iSET UP COLUMN COUNT 
MOV WBUFBEG,3CDA §;SET UP BUS ADDRESS 


SEQ O14S 


Dle 
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TEST STACK CHECK SEQ O146 
INC acos - READ | 
TLOPGB: TSTB : ; CHECK CONTROLLER READY : 
010000 art 148088, acos OE CK BF Pon TROLL — 
BNE 1§ “BRANCH IF SET 
ERROR +43 OFF-LINE (BIT 12) WASN’T SET 
1S: TST acDs CHECK SPECIAL CONDITION BIT 
BMI 2$ “BRANCH IF SET 
ERROR +26 :SPECiAL CONDITION NOT SET 
040000 25: BIT #40000, @CDS § ;CHECK FOR CARD READER ERROR 
races = }BRANCH TF ORD 
+ READER ERROR BIT 14 NOT SET 
922010 005777 157224 3S: TST ICDDB TEST BITIS OF STATUS REGISTER #2 
M2014 1 BPL 4§ IF NOT SET INDICATING 
-OLD CD11 CONTROLLER 
o10000 157214 BIT #19000, aCD08 “1S STACK INDICATOR SET? 
ERROR +46 STACK CHECK BIT12 NOT SET 
4S: BIT #027577,aCDS § ;CHECK FOR EXTRA BITS 
Q S$ : IF 0K 
ERROR +15 “STATUS WORD ERROR 
cS: MOV STINTG, SADINT ;LOAD RETURN POINTER 
i THe FOLLOWING REPRESENTS THE EQUIVALENT OF “BIS #340,PS” 
': MOV 34. -(SP) ‘SAVE CURRENT TRAP VECTOR 
000034 MOV #645, 34 :: SETUP NEW TRAP VECTOT 
Ne TRAP ::PUSH OLD PSW AN PCON STACK 
31E O00006 64S: MOV 2(SP),6(SP) ss 
815 MOV #65, (SP) - REPLACE OLD PC WITH NEW 
82 RTI : -RESTORE PSH 
Be 65S: MOV  (SP)+,34 ; ;RESTORE OLD TRAP VECTOR 
82¢ MOV (SP)+’ $TMPE 
82. 001214 BIS #340, $7 
iF MOV STMPb, -(SP) -:PUT NEW PS ON STACK 
GC - MOV #665 , - (SP) --PUT NCW PC ON STACK 
Bet ial RTI :: POP NEW PC AND PS 
ee ATHE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)™ 
830 999034 MOV 34. ~(SP) :: SAVE CURRENT TRAP VECTOR 
83 44 000034 MOV #67S, 34 :: SETUP NEW TRAP VECTOT 
8 3¢ TRAP :: PUSH OLD PSW AN PCON STACK 
83: pone Q000006 67%: MOV 2(SP). 6(SP) i 
8 l MOV #685, (SP) - REPLACE OLD PC WITH NEW 
83S RTI : sRESTORE PSW 
83 900034 68S: MOV (SP)+, 34 ; RESTORE OLD TRAP VECTOR 
1837 MOV (SP)+! 2(ADINT) : rf 
8 3 i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIC #340,PS 
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ERROR 


; SAVE CURRENT TRAP VECTOR 
fa OLD Pou cy AN PEON STACK STACK 


sREPLACE OLD PC WITH NEW 
. «RESTORE PSW 
-:RESTORE OLD TRAP VECTOR 


;;PUT NEW PS ON STACK 
3 PUT NEW PC ON STACK 
>; POP NEW PC AND 


1 NTER 
OTHE EQUIVALENT OF “BIS #340,PS” 


t cave CURRENT TRAP VECTOR 
:: SETUP NEW TRAP VECTO! 
::PUSH OLD PSW AN PCON STACK 


" - -REPLACE OLD PC WITH NEM 
ssRESTORE Pod 

-RESTORE OLD TRAP VECTOR 
. ;PUT NEW PS ON STACK 


5 3 PUT PC ON STACK 
;; POP NEW PC AND PS 


FOLL OMe REPRESENTS | THE EQUIVALENT OF “MOV PS,2(ADINT)” 


cave CURRENT TRAP VECTOR 
> SETUP NEW TRAP VECTO 
-:PUSH OLD PSW AN PCON STACK 


ig -REPLACE OLD PC WITH NEW 
. «RESTORE PSW 
 -RESTORE OLD TRAP VECTOR 


-THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIC #340,PS” 


MOV 34.-(SP) 
000034 HOV | #69S, 34 
o00006 69S MOV 2(SP), 6(SP) 

MOV #70$, (SP) 
RTI 
70$: MOV (SP)+,34 
MOV (SP)+, STMPG 
001214 BIC 
MOV STMP6, -( 
MOV #71$,-(SP) 
RTI 
713: 
MOV #100,  acos 
TYPE, MSGi 
TYPE, CRLF-3 
BR 
TINTG: CMP (SP)+, (SP)+ 
a ae 
eLR =(5P) 
MOV 4 
000034 MOV Scag 
O00006 64S: MOV 2(SP) .6(SP) 
MoV #655, (SP) 
65S: MOV (SP)+, 34 
MOV (SP)+:STMP6 
001214 BIS #340, STMP6 
MOV STMP6, - (SP) 
MOV #66S, -(SP) 
RTI 
665: Ti 
éLR (SP) 
MOV 34° - (SP) 
000034 HOV #675, 34 
000006 67%: MOV 2(SP) .6(SP) 
nov #68$, (SP) 
68$: MOV (SP)+,34 
MOV (SP)+,2(ADINT) 
&LR -(SP) 
NOV 34 -(SP) 
000034 MOV #695, 34 
TRAP 


69S: MOV 2(SP) ,6(SP) 


708: MOV (SP)+,34 


tt cave CURRENT TRAP VECTOR 
:: SETUP NEW TRAP VECTOT 
-:PUSH OLD PSW AN PCON STACK 


i sREPLACE OLD PC WITH NEW 
RESTORE’ PSid 
“RESTORE OLD TRAP VECTOR 


8 


SEQ 0147 


Fle 
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0ZC08.P TEST STACK CHECK ERROR SEQ O14e 








a re re sisi tues 
001214 BIC #340, $TMPE 
ooie14 MOV STMP6, -(SP) - =PUT NE ON STACK 
NOV 871$, -(SP) :sPUT NEM N STACK 
71S: . a 
7770 "MoV 8-72 ;SET UP 
Ug War ® go ELF eae 
BR WAIT ca RG INTERRUPT 
TINTGA: (SP)+. (SP)+ 
ft cir 10 he sg RTHE CARD READER STATUS 
104004 ERROR +4 TCARD READER STATUS ERROR 
1$: 
ON M-1000/M-200 BIT 13 IS ALWAYS CLEARED 
‘ON M-1200 IF END OF FILE BUTTON IS PRESSED WITH INPUT 
; HOPPER LOADED N INPUT HOPPER BECOMES EMPTY 
} CHECK INDICATOR LIGHT COMES ON AND BITS 
-13 I4 AND 15 ARE SET 
737 001266 TST cp1000 1S READER M1000/M200? 
BEQ TSTMl2 ‘BRANCH IF READER IS M-1200 
023256 IMP TSTM1O OUT OF THIS TEST IF M1000/M200 


STMle: 
: EEK REGL LEELA EE EEA EE RARE EARREL RARER EA ERR ERE LEER EELS 
-#TEST 4 TEST ’ FILE’ ue 
° — oe ELEERERALESRREREERE RESALE LERAAAAALA RELEASE 


SR séPC INIT 
TYPE, ™SG39 ;TST42 EOF _& HOPPER CHECK 
TYPE, MSGe0 ;"PUT ANY TWO CARDS IN INPUT HOPPER” 
TYPE, HSG] “"PRESS CARD READER ’RESET’™ 
TYPE, MS :“THEN HIT *CONTINUE’ ON THE CONSOLE” 
TYPE,  CRLF-3 “MOVE MESSAGE UP ON TTY 
HALT 
1S: BIT #10,  aCDS | ;CHECK FOR TRANSITION TO ON LINE 
BEQ 1$ ;MAIT FOR IT 
TYPE, MSGe2l TRESS END OF FILE BUTTON” 
TYPE, M5Ge :“THEN HIT CONTINUE’ ON THE CONSOLE” 
TYPE, CRLF-3 *MOVE MESSAGE UP ON T 
JSR PC, INIT 


BIT #20000, aCDS sCHECK BIT 13 
BEQ 2$ “BRANCH IF NOT SET 
ERROR +47 “EOF SET FROM BEGINNING 
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HOPPER CHECK 


665: 


67S: 


68$: 








BIT ous. acOs ;CHECK BIT 14 


BEQ :BRANCH IF NOT SET 
ERROR +50 sREADER CHECK ERROR SET FROM BEGINNING 
BIT #4, acos CHECK BIT 2 
FRAOR 451° sBRANCH “TOPPER CH 
+51 : R CHECK SET FROM BEGINNING 
TST DS s CHECK ERR IT 
APL 2s BRANCH I ho SET 
ERROR +14 “ERROR SET FROM BEGINNING 


MOV STINTI, DADINT ;LOAD RETURN POINTER 
; THE rou REPRESENTS THE EQUIVALENT OF “BiS #340,PS" 


LR es 

MOV 34. -(SP) ::SAVE CURRENT TRAP VECTOR 

MOV #645, 34 :: SETUP NEW TRAP VECTOT 

TRAP ::PUSH OLD PSW AN PCON STACK 
ome? 6(SP) .8 

MOV #65S, (SP) -:REPLACE OLD PC WITH NEW 

RTI ; RESTORE ps 

MOV (SP)+, >sRESTORE OLD TRAP VECTOR 
(SP)+’ STMPG 

BIS #40, STHPE 

MOV STMPb, -(SP) ::PUT NEW PS ON STACK 

MOV #66$, -(SP) PUT NEW PC ON STACK 

RTI :: POP NEW PC AND PS 

i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 

MOV 34. -(SP) ‘SAVE CURRENT TRAP VECTOR 

MOV #675, 34 :: SETUP NEW TRAP VECTOT 

TRAP - PUSH OLD PSW AN PCON STACK 

MOV 2(SP).6(SP) i 

MOV #69S, (SP) - REPLACE OLD PC WITH NEW 

RTI : RESTORE PSW 

MOV (SP)+,34 -;RESTORE OLD TRAP VECTOR 

MOV (SP)+.2(ADINT) 

j THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIC #340,PS” 

s% 

MOV 34. -(SP) ::SAVE CURRENT TRAP VECTOR 

MOV #69S, 34 :: SETUP NEW TRAP VECTOT 

TRAP :?PUSH OLD PSW AN PCON STACK 

MOV 2(SP).6(SP) es 

MOV #70$, (SP) --REPLACE OLD PC WITH NEW 

RTI : RESTORE PSW 

MOV (SP}+,34 ; RESTORE OLD TRAP VECTOR 

MOV (SP)+) STMPS 


SEQ 0149 
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RF tt SHEA 
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TEST ’END OF FILE’ AND HOPPER CHECK 
001214 BIC TMP 
1214 MOV STMP6, -(SP) 
100 mov 8715, -(SP) 
RTI 
71$: 
OOO HOV 00. oepe 
nase MOV #BUFBEG, aCDA 
INC acos 
BR 
TINTI: CMP (SP)+, (SP)+ 
020000 BIT , acns 
BEQ it; 
ERROR +47 
040000 1S: BIT #40000, a3CDS 
BEQ 2$ 
ERROR +50 
2s: TST JCDS 
BPL 3$ 
ERROR +14 
023156 3S: MOV #TINTIA, ADINT 
BR SEC 
TINTIA: CMP (SP)+, (SP)+ 
020000 BIT #20000, acDs 
BNE 1$ 
ERROR +52 
040000 13: BIT #40000, acDS 
ERROR +53 
000004 2$: BIT #4, acDs 
BNE 3$ 
ERROR +54 
33: TST acos 
BMI Ug 
ERROR +26 
5 4§$: TYPE, MSG6 
1576 TYPE, MSG1 
1632 TYPE, MSGe 
030550 TYPE, CRLF-3 
HAL T 
000010 cs: BIT 810, acods 





sRESTORE THE STACK 
;CHECK BIT 13 


‘BRANCH IF NOT SET 
sEOF SET AT END OF ONE CARD 


;CHECK BIT 14 
:BRANCH IF NOT SET 
“READER CHECK ERROR SET AT END OF ONE CARD 


;CHECK ERROR BIT 
:BRANCH IF NOT SET 
“ERROR SET AT END OF ONE CARD 
sLOAD RETURN POINTER 
‘READ SECOND CARD 
*RESTORE THE STACK 
;CHECK BIT 13 
BRANCH IF 
sEOF NOT SET AT END OF FILE 
;CHECK BIT 14 


-BRANCH IF SET 
*READER CHECK NOT SET AT END OF FILE 


: CHECK CHECK BIT 2 eer 
i ‘HOPPER CHECK NOT SET WHEN HOPPLR EMPTY 
-CHECK ERROR BIT 
‘BRANCH IF SET 
ERROR BIT NOT SET AT END OF FILE 
RESTO CARDS 10 THE INPUT HOPPER” 
:"THEN HIT BORTINUE C ON | Pie CONSOLE” 
“MOVE MESSAGE UP ON T 


;CHECK TRANSITION TO ON LINE 


Ile 
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OZCDB.P11 T42 TEST ’END OF FILE’ AND HOPPER CHECK SE@ 0151 


001775 BE@ S$ ;WAIT FOR IT 


iy jerowcw Ie T ST 


ie 


T CLEAR BY TRANSITION TO ON LINE 





TSTMIO: 
. a KKKLERLHARESREAESRARASL ALA RLERA ESAS RELA AHELAE 
TEST 43 TEST READ CHECK 
- LELSRELARRERERLEEEE ELERERKEAELE SALA ERA REAR RER EERE LA REARRELA RELA ALES 
000004 1ST43: 
if CK ERROR SHO SHOULD SET BIT 15, BIT it AND BIT 12 
Tals ere ERROR OCCURS MEN WITH THE TO NORMAL LESUNCHED alia THE CARD 
004737 025744 OR Poin NIT 
104400 174 TYPE, ;TST43 DARK-LIGHT CHECK 
1 O06 TYPE, need : "PLACE Peon 9 AL DARK Te HET, SH CARD ONLY 
1s TYPE, MSGI fn a 
TYPE, CRLF-3 : SSAGE UP ON W 
1! TLOPH: BIT 810000, 3cDS § ;CHECK FOR BR OF LINE 
Q TLOPH sHALT FOR OFF-LINE 
000010 TLOPHA: BIT #10 acds CK FOR "TRANSITION TO ON LINE” 
BEQ TLOPHA ‘ia T FOR IT 
tat 140210 CMP #140210, COs “C CK FOR CORRECT STATUS BITS 
+4 : -STATUS NOT EQUAL TO 140210 
12714 177701 1S: MOV 8-77, acdc SET UP COLUMN COUNT 
7 basque HOY #BUFBEG, ICDA T UP BUS ADDRESS 
TLOPHB: TSTB Be PK CONTROLLER 
Be fT Pia FOR CONTROLLER Re READY 
010000 BIT #10000, aCDS 
1 i BNE ow, tf leer 
1 ERROR +43 OFF-LINE (BIT 12) WASN’T SET 
? : 1S: Ist acos CHECK SPECIAL CONDITION BIT 
1 ERROR +26 SPECIAL CONDITION NOT SET 
932713 040000 25: BIT #40000, 3CDS § ;CHECK FOR CARD READER ERROR 
1001 BNE 3$ ‘BRANCH IF SET 
ities ERROR +523 CARD READER ERROR BIT 14 NOT SET 
005772 155640 3S: TST JCDDB ;TEST BITIS OF STATUS REGISTER #2 
1 BPL Ug IF NOT SET INDICATING 
SOLD CD11 CONTROLLER 
040000 155630 BIT #40000,9CDDB § 315 READ CHECK INDICATOR SET? 
1001 BNE 4§ : BRANCH 
104056 ERROR +S6 ‘READ CHECK BIT14 NOT SET 
032713 027577 4S: BIT "027577,3CDS § ;CHECK FOR EXTRA BITS 


eh hh * ogae-s MACY11 27(654) 1-JUL-77 08:39 PAGE 80 


DZCOR.P T43 TEST READ CHECK ERROR SEQ 01S2 
: BEQ AGAIN ; BRANCH 
“STATUS WORD ERROR 
035373 AGAIN: : -1S CARD | RS-1 
WAITA: TSTB as TKS TEST u FOR READY 
155502 001202 MOVB We IKB, STMPL : MOVE LRERRTER tN 
1 WAITB: TSTB aS$TPS “TEST TTY FOR DONE 
WAITB WAIT IF NOT Y 
1202 155470 MOVE #§ $TMP1,aSTPB * ECHO 
001202 BIC #177600, STHP1 “CLEAN JUNK OFF BYTE 
1 000116 CMPB’ © $TMP1. #116 -TEST FOR_N 
BEQ BYPASS *SKIP TEST IF NO 
o01202 000131 CMPBOfséS MP1, #131 seeT FOR Y 


oes he, feo Rae or aa 


ach Mla 





036226 cs: TYPE,  MSG41 ;TST43A NIS-REGISTERED CARD TEST 
034745 TYPE, MSG26 TEST F VISUAL VERIFICATION OF 
: READ POE CK 
53 TYPE, CRLF 
4 TYPE, MSG27 :PLACE CARD INTO HOPPER 
Bae TYPE’ CREF 
TYPE, CRLF-3 
010000 TLOPHE: BIT #10000, aCDS “WAIT FOR OFF-LINE 
BEQ TLOPHC ‘WAIT FOR OFF-LINE 
000010 TLOPHD: BIT #1 acDs ‘CHECK FOR TRANSITION TO ON LINE 
140210 CMP #i40210,aCDS § ;CHECK FOR CORRECT STATUS BITS 
BEQ 1$ : BRANCH 
ERROR +4 “STATUS NOT EQUAL 140210 
14 17770 1S: MOV #-77, aCDC j SET UP COLUMN COUNT 
21 S44 MOV #BUFBEG,aCDA § ;SET UP BUS ADDRESS 
l INC acDS 
105713 TLOPHE: TSTB  acpDS 
6 BPL TLOPHE 
010000 BIT #10000, aCDS 
l i BNE 1$ 
ERROR +43 
104400 035236 1S: TYPE , MSG28 sCHECK READ CHECK LIGHT 
12712 024064 BYPASS: MOV STINTH,@ADINT _;LORD RETURN POINTER 
i THE FOLLOWING " REPRESENTS THE EQUIVALENT OF "BIS #340,PS” 
ia MOV 34. -(SP) tt cave CURRENT TRAP VECTOR 
Wee 000034 MOV 3645.34 -:SETUP NEW TRAP VECTOT 
TRAP ;;PUSH OLD PSW AN PCON STACK 
l gg00e op00006 64S:  # MOV 2(SP).6(SP) + 
1271 3664 MOV 65S, (SP) ;;REPLACE OLD PC WITH NEW 





Kle 
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0ZC0B.P11 T43 TEST READ CHECK ERROR SEQ 0153 
41 RTI : RESTORE PSW 
41 653: MOV (SP)+,34 -:RESTORE OLD (RAF VECTOR 
cores = BAS agehe® 
4 MOV STMP6, -(SP) -:PUT NEW PS ON STACK 
it MOV #66$, -(SP) -:PUT NEW PC ON STACK 
dt - RTI . : PC AND PS 
di i THE FOLLOWING REPRESENTS THE EQUIVALENT OF “MOV PS,2(ADINT)” 
4 MOV 34, -(SP) :: SAVE CURRENT TRAP VECTOR 
4 000034 MOV #675, 34 SETUP NEW TRAP VECT 
4 TRAP --PUSH OLD PSW AN PCON STACK 
it pooode «675: We eC OLD PC WITH NEW 
4 RY ; sRESTORE. 
416 68S: ( 1+, 34 -sRESTORE OLD TRAP VECTOR 
4 (SP)+. 2(ADINT) 
' t i THe FOLLG MING SENTS THE EQUIVALENT OF “BIC #340,PS” 
"yt MOV 34. -(SP) ::SAVE CURRENT TRAP VECTOR 
4185 Oe37t 000034 MOV #695, 34 :: SETUP NEW TRAP VECTOT 
4I1E {4 TRAP »:PUSH OLD PSW AN PCON STACK 
WIE f 000006 69S: MOV 2(SP),6(SP) . 
4188 Oe400; MOV #708, (SP) - REPLACE OLD PC WITH NEW 
4189 eH RTI : sRESTORE PSW 
4 4 70$: MOV (SP)+, 34 ;:RESTORE OLD TRAP VECTOR 
41S et MOV (Sh) TMP6 
419e Oewt 001214 BIC 0 tines 
4 eu MOV § STMP6, -(SP) :;PUT NEW PS ON STACK 
4194 e403 MOV #71, -(SP) ::PUT NEW PC ON STACK 
n > Yer ven RTI ;: POP NEW PC AND PS 
He oy "mov. ss #100, @CDS_~=—Ss ; SET_INTERRUPT ENABLE 
e TYPE, MSG :"RESTORE CARDS TO THE INPUT HOPPER” 
TYPE, M™SG29 "PRESS CARD READER ’RESET’™ 
TYPE, CRLF-3 "MOVE MESSAGE UP ON TTY 
BR yee WAIT FOR AN INTERRUPT 
TINTH: CHP : (SP)+, (SP)+  ;RESTORE THE STACK 
TYPE,  S$BELL : RING-R-DING 
JMP ER12CD ‘LOOP BACK TO THE BEGINNING 


5 2 A EE I I I GEE EE EE SAE AE 


TO LOOP THRU A SI INSTRUCTION TEST OR ERROR FUNCTION TEST 

‘NOTE THAT SWil MUST BE DOWN AFTER T 

: T SW<14> MUST BE SET..... MUST BE SET.....MUST BE SET..... 

ee 
001100 "MOV RSCMTAG, Rb : FIRST LOCATION TO BE CLEARED 


CLR (R6)+ --CLEAR MEMORY LOCATION 


Lie 
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OZCDB. P11 LOOP ON TEST ROUTINE | SEQ 0154 


| 














Sie Buns pam mus : = 
155? BSdiss 818595 BBEARe -* ee Cal ak SCOPE ROUTINE 
. a Nie D612 , ci CTOR FOR ERROR ROUTINE 
2 nov str Pe pvc gta, vecTo FOR TRAP CALLS 
HOV a c j BOWER, FAILURE VECTOR 
ti 900014 nov i Set +“ ty VECTOR TO SRTRN 
Osi MOV TRN TO A RTI 
10 MOV “TRY TO DO A RTT 
o24252 nV iAND PC 
RTT :: TRY THE RTT 
Q00006 O15140 64S: HOV aRTT, SRTRN ::RTT IS LEGAL--SET SRTRN TO A RIT 
BBL? ooooio EEE: RY Hie amesidl NBR Tate oh Ben ST 
101 001106 MOV SLPAOR 1 ein tee THE LOOP ADDRESS FOR SCOPE 
OE HOV ::SAVE ERROR VECTOR 
: 000004 MOV ;;SET UP TIME OUT VECTOR 
5 ' oR + BRANCH F NOT OTRAP OCCURS 
kr; 000176 001136 67%: MOV i Pol ia: SOFT O EUR 
i! 000174 O01140 NOV 3 Sie DISPLAY REG 
St 990006 bes: HOV fete ERROR VECTOR 
| NRE TEE, : (USER. OF DESIRED 
ee So fue REGISTER, THEN 
. : 
? Biya? ISHSNO OBNEee HOY SWR, RETRNX fk Meg ORES. 
130 056732 pongKe 024622 0D. we ,RETRNX ‘et Se fh TER ERcoPe INSTRUCTION 
l2 way ee OPTIONS Beir ii il "AUST = 0) 
4264 tess 032797 010000 154514 BIT #10000, JSWR CK 
1432 BEQ 1$ H IF NOT SET 
j THe FOLLOWING REPRESENTS THE - VALENT OF "BIC #20,PS” 
vei 000034 MOV 34. -(SP) 1 SAVE CURRENT TRAP VECTOR 
taa400 we TRAP 38,4 OP OD PS A BN’ PEON STACK 
Aieeee o00002 O00008 69%: MOV 2(SP),6(SP) i 





FT 








Mle 
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: ROUT INE SEQ 0155 





OZC08.P11 TEST 
272 MOV 8705, (SP) ‘REPLACE OLD PC WITH NEW 
RTI . «RESTORE PSW 
74 MOV (SP)+, RESTORE OLD TRAP VECTOR 
75 ee OB ste 
i MOV STMP6, -(SP) > :PUT FS ON STACK 
o7¢ MOV 871$,-(SP) ; PUT PC ON STACK 
4276 RTI :: POP NEW PC AND PS 
429 BRS ;SKIP NEXT INSTRUCTION 
8. - THE FOLLOWING REPRESENTS THE EQUIVALENT OF “BIS #20,PS” 
428s 34. -(SP) t cave CURRENT TRAP VECTOR 
Fs): MOV #72$, 34 ig SETUP NEW. IR TRAP CTOT 
Yor TRAP STACK 
438 Mov oo avas.tsp) OLD PC WITH NEW 
429¢ Ory ‘ . «RESTORE s Ber ace 
a9 | MOV (SP)+,34 ;;RESTORE OLD TRAP VECTOR 
429¢ MOV (52) +’ STMPG 
+ BIS stMPs 
mM? MyBB LCSPD OUT NEW PO ON ie 
gf RTI ' 1 PEP polos 
39 MOV -—«-8XLOOP,, RETURN a als POINT FOR THIS SECTION 
$0¢ TYPE,  STMES Roee TOIL ME REV. LEVEL 
0 TYPE, MLOOP INDICA ING A LOOP ON TEST 
0: MOV RETRNX, SLPADR is = BY : TEST FOR LOOPING 
10 . WILL UP BY ’SCOPE’ 
08 IMP BRE TRNX TO 
08 
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Ne ete 
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SSCMTAG, Rb ;:FIRST LOCATION TO BE CLEARED 
(R6)+ + CLEAR MEMORY LOCATION 
T,R6 53 ? F NO 
sp ACK POINTER 
Berorvec' Tor ATE Teak FOR SCOPE ROUTINE 


TEC 5 igERT VECTOR FOR ERROR ROUTINE 
+P TRAP VECTOR FOR TRAP CALLS 
ae ek FAILURE VECTOR 

+ COUNTER 


- 
: :INITI OF ITERATIONS 
STBITVEC' §; aie BIT VECTOR TO SRTRN . 


jag **, Aber strin TO A RTI 


1 0 DO A RTT 
“3 (SP) OND het 
‘ :: TRY THE RTT 


::RTT IS LEGAL--SET SRTRN TO A RTT 


bbs 
baeSvECH2, asresvet RTT RESTORE TRAP CA ToHER _— 


: “T" BIT SWITCH 
Ae i INITI ie LOOP ADDRESS FOR SCOPE 
SAVE VECTOR 





iE Ue up mereneine OUT VECTOR 
: BRANCH BRANCH I NO T TF A TYREQUT OCCURS 
SHR Ps NT TO 
G DISPLAY deste s TO SB ISPLAY REG 
iH ERROR VECTOR 











pave eT POINT FOR_THIS SECTION 
aan we ae ‘ 
ERING SINGLE at: 


T 
biti alt LOAD PATTERN VALUE INTO 
: SMI TCH USER T0_bon SWS<11:0>, THEN 


Ss 
T FOR CARD IMAGE PATTERN 


aSWR, CARDIM is STORE PATTERN 
IM ;CLEAR UPPER BITS OF PATTERN 


i 


SEQ 0156 


4 bis 


SEQ 0157 


IDENTICALLY PU 
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58 : Bai 
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010000 CKERR: BIT #10000, CDS CHECK FOR OFFLINE 
‘4 1 : Ft NOT 
yy 001222 . er 
44 000010 CKERR3: BIT 81 acos TRAPSITION 1 TO ON-LINE 
44 BEQ 
Wy BR T erat OVER 
444 004000 CKERRI: BIT #4000, 3CDS CHECK FOR DATA ERROR 
BEQ CKERR2 
025742 TST DERFLG 
yy apy BPL CKERR2 
6 — oe hie if a - BRANCH IF LEGIT 
CKERR2: PE ROR “st : . , LIVE ERROR. 
, BR CKLOOP 
“4 Jc “ CKFAIL: I T $ 
J 1800 153376 aie pate aSWR + EReCK OR INHIBITING PRINTOUT 
CKERROR - BRANCH PRINTOUT IF SET 
x 001260 TST G :TEST FLAG TO PRINT HEADING 
5 CKNOHD BRANCH IF OCNE 
55 INC ERFLG : PRINT NG ONCE ONLY 
i Sa 
: CKNOHD: : : OUTPUT AGE RETURN, LINEFEED 
5f 1 INC CLCNT -STEP_ UP FOR ERROR REPORT 
+ 1 MOVs CLCNT, -( SP) ; PRINT THe OF THE CARD 
of TYPOS ON WHICH AN WAS DETECTED 
>| TYPE, SPACE 
DEC CLCNT DROP COLUMN COUNT BACK AFTER REPORTING 
* 4 TST DERFLG 
030S4S Bre 8 SBace™ 
6 nove” ROD, -(SP) “PRINT THE INCORRECT VALUE 
TYPOS THAT WAS READ FROM THE 
‘; ‘BIE OB i oa 
wrt STB (RO)+ : CORREC LOCATION AFTER PRINTOUT 
4476 CKNOPK: MOV -(RO),-(SP) -PRINT THE CT VALUE THAT 
4y TYPOS af READ FAM TLE COLUMN 
44 .BYTE 6 : INDICATED 
‘ a See e 
oo TST (RO)+ } T MEMORY LOCATION AFTER PRINTOUT 
uy 030545 CKOVRI: TYPE, SPACE 
44 34 MOV 70TCRO,-(SP)  ;PRINT THE CARD NUMBER ON WHICH 
M4 TYPDS ‘THE ERROR WAS F 
030545 TYPE, SPACE 
32 MOV TOTERR,-(SP) | ;PRINT THE TOTAL NUMBER OF ERRORS 
TYPDS ; ACCUMULATED T 
153244 CKERROR: TST aSWR i CHECK SWiS TO HALT ON ERROR 
BPL 1§ sBRANCH IF NOT SET 
HALT “HALT ON ON ERROR 
015334 1S: INC CLCNT ‘STEP UP COLUMN COUNT TO BE CORRECT FOR 
“NEXT POSSIBLE COLUMN TO BE CHECKED 
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IDENTICALLY PUNCHED CARDS TEST SEQ 0159 
oe WE A a A CARD? 


MP Sno we "OT OO 
Stree, NGONTINUE CHECKING COLUMNS 


;IN PACKED 
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0ZC08.P11 COMMON ROUTINES SEQ D160 
‘WAIT F IS STI Q 
i NITIAL | arise ei, ow ea, Bi ai ‘Doesn't BLEAR PROPERLY 
025772 {tNIT: eet: eRe rE IF RT INe g "5 SET 
1S: TSTB rene WAIT FOR IN CASE 
BPL 13 A CARD He Tie I 
000400 MOV #400, acDS ;INITIALIZE THE RE 
000200 CMP #200, acDS = ; MAKE INITIAL ZATION OK 
BEQ ‘BRANCH I I 
ERROR +67 “NOT ALL BITS OF STATUS REGISTER ARE ZERO 
25: RTS PC : RETURN 
SUBROUTINE TO CHECK FOR BIT 12 (OFF-LINE) BEING SET IN CARD 
“READER CSR, AND PRINT OUT A ME IF IT IS 
010000 CKOFFL: BIT #10000, 3CDS § ; CHECK ei 12 
BNE i$ ‘BRANCH IF SET 
RTS PC : RE IF NOT SET 
033410 1S: TYPE, MSG18 ." READER OFF-LINE” 
033175 TYPE,  MSG17 "REMEDY THE CONDITION ETc.” 
HALT WAIT FOR CONTINUE 
BR CKOFFL CHECK AGAIN 
: KEKE LEER EEEEE EL ER ELLA SRE KEA EERE LER EAL EREL ELS RELHKRRKHEEAAAAELE 
_SBTTL. ERROR MESSAGE TYPEOUT ROUTINE 
pil “ITEN CON BYTE” (SITEMB) TO DETERM NE WHICH 
ERROR T THEN OBTAINS. FROM THE “ERROR TABLE” (SERRTB), 
19 ee EPORTED. Ti INFORMATION CONCERNING THE ERRCR. 
slieiah 
001227 TYPE iE ; "CARRIAGE RETURN” & “LINE FEED" 
CLR RO’ :  BTCKUP THE ITEM INDEX 
001114 BISB ag@aeSITEMB,RO 
BNE 1$ ts iF ITEM NUMBER 1 ZERO, JUST 
001116 MOV SERRPC, - (SP) SINE SERRPC F PR HE ECU p 
TyPOC = + EO TY TyPE-~OC TAL ASCII(ALL DIGITS) 
1$ DEC RO ; {ADJUS THE INDEX O THAT IT WILL 
ASL RO : WORK FOR THE ERROR TABLE 
ASL RO 
001270 te REERRTB RO : FORM TABLE POINTER 
026070 MOV (RO)+, 2 ; ;PICKUP “ERROR MESSAGE” POINTER 
BEQ 3$ “SKIP TYPEOUT IF NO POINTER 
TYPE + TYPE THE “ERROR MESSAGE” 
25: .WORD «OO ‘2 "ERROR MESSAGE” POINTER GOES HERE 
001227 TYPE  ,SCRLF :: "CARRIAGE RETURN” & “LINE FEED” 
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SEQ O16! 

3S: MOV (RO)+,4S ::PICKUP “DATA HEADER™ POINTER 

BEQ S$ SKIP TYPE 
us Ro OO ee Ener” POINTER RE 

TYPE SCRLF : > "CARRIAGE & BSE ED 
cs: MOV {RO), RO - > PICKUP “DATA ABLE” POINTER 

BNE 7$ ss Ub a 3 DATA 
AS: MOV (SP)+.RO > :RESTORE RO 

TYPE SCRLF :: "CARRIAGE RETURN” & “LINE FEED” 
- RTS PC : > RETURN 

MOV J(RO)+,-(SP) ;;SAVE a(RO)+ FOR TYPEOUT 

TYPOC ;;G0 TYPE--OCTAL ASCII(ALL DIGITS) 

TST (RO) --1S THERE ANOTHER NUMBER? 

BEQ 6$ ::BR IF NO 

8$ -- TYPE TWO(2) SPACES 

BS 75 - LOOP 
QS: “ASCIZ / / ':TWO(2) SPACES 

EVEN 


. HEEL KEK ERLE GLEE EEE ERE LE LES EEF EERE EERE REESE LER EAE RREE REE REE EE 


.SBTTL ERROR HANDLER ROUTINE 


; #TRIS ROUT INE WiLL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
; #SAVE i AND THE ADDRESS OF THE ERROR CALL 
AND GO TO SERRTYP ON 


‘THE SWITCH OPT LONS PROVIDED BY THIS ROUTINE ARE: 


: £SW1S=1 ON 
: ¥SW13=1 INHIBIT ERROR TYPEOUTS 
j #SWL0=1 BELL ON ERROR 
: i ERROR N : sERROR=EMT AND N=ERROR ITEM NUMBER 
SERROR: 
NOV SP. SREGS STACK POINTER POSITION 
3(&P) $REG7 : CONT NTS OF *PSW’ 
MOV acdS, $T ‘CONTENTS OF DEVICE ’CDS’ 
MOV acb0e STMP “CONTENTS OF Ice °CDD’ 
MOV , STMP2 -C S OF DEVICE ’CDC’ 
MOV ICDA, $TMP3 “CONTENTS OF DEVICE ’CDA’ 
7$: INCB  SERFLG SET THE ERROR FLAG 
BEQ 7§ ::DON’T LET THE FLAG GO TO ZERO 
MOV STSTNM, ADISPLAY ;;DISPLAY TEST NUMBER AND ERROR FLAG 
BIT #BIT10, - BELL ON ERROR? 
-:NO - SKIP 
TYPE SBELL * RING BELL 
1S: INC SERTTL COUNT THE NUMBER OF 
MOV (SP). SERRPC :tGET ADDRESS OF ERROR INSTRUCTION 
SUB #2, SERRPC 
JSERRPC.SITEMB ;;STRIP_AND SAVE THE ERROR ITEM CODE. 


SKIP TYPEOUT IF SET 
20$ t SKIP TYPEOUTS 
-:GO TO USER ERROR ROUTINE 
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OZCD8.P11 
TYPE , SCRLF 
TST - :;HALT ON 
SUP IF INUE 
HAL T -: HALT ON ERROR! 
CMP #SENDAD , d#42 -:ACT-11 AUTO-ACCEPT? 
BNE 3$ > BRANCH IF NO 
HALT . YES 
RTI ; ;RE TURN 


: EELLEELEELELEE EE SEE EEE LEELA SEES REESE RELY RELA REALE RAE RER EELS 


-SBTTL SCOPE HANDLER ROUTINE 


-*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. I7 WILL INCREMENT 
:#AND LOAD Ly. U2 ys NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:C)) 


LOAD THE LG) INTO DISPLAY<15:08> 
aap SWITCH OPTIONS TIONG PROVIDE BY THIS BOUT ENE ARE ARE: 

j #SML1=1 INHIBIT NT EERATIONS 

# SCOPE ; sSCOPE=I0T 


SSCOPE: 
1S2602 1S: BIT #BIT14, aSWR 3 sL00P ON ty TEST? 


BNE SOVE ~ 
-gueBeSTART OF CODE FOR THE XOR TESTERSESSS 
4xTSTR: BR b$ TF RUNNING ON THE = XOR” TESTER CHANGE 


>: THIS INSTRUCTION TO A "NOP" (NOP=240) 





MOV THE CONTENTS OF THE ERROR VECTOR 
‘ 000004 MOV T FOR TIMEOUT 

eb3! TST 7 OUT ON XOR? 

263 MOV : RESTORE THE ERROR VECTOR 

et BR : $160.16 TG NEXT TEST 

SS: CHP (SP )+, (SP + : STACK P vee) A TIME OUT 

le BR Saver’ ror as ERROR eS NT Ee 

eb 6S: ; ##888END OF FOR THE XOR’ 'fEST seeee 

eb. 25: TSTB LG OCCURRED? 

Fe BEQ ie 

} 4S: CLRB G THE ERROR FLAG 

2 LR STINES >: CLEAR NUMBER OF OF ITERATIONS TO MAKE 
ref 1S2516 3S: IT #BITi1,aSWR iar ie ye T 

leb4e BNE 1$ ::BR I 

lebNec ey $PASS TIF FIRST fa  eenverme 

det Fe ent # werent? TBTTLTERAT [ON i: COURT 

et 001104 CMP STIMES, SICNT CHECK ne ONS MADE 
leb44 BGE SOVER BR IF 

leb444 001104 1S: MOV #1. $ICNT REIN ITI i7e ie (aie COUNTER 
eb4Se 001220 MOV  SMXCNT,STIMES  ;;SET OF ITERATIONS TO DO 
Deb46C $SVLAD: INCB $TSTNM :* COUNT TEST 

Neb4E MOV ) :: SAVE SCOPE LOOP ADDRESS 





£ 
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O2C0B.P11 
3 ADDRESS 
;;FIXES PS 


deee ai say line iSe442 SOVER: MOV 
RTI 
SMXCNT: 1 ;:MAX. NUMBER OF ITERATIONS 


: EELEREEELELESERESE LEE LEE RAA ERASER RE REE RE REEL EERE LE LER ERE REEL ER EE 


-SBTTL TYPE ROUTINE 


- “ROUTINE TO TYPE ASCIZ MESSAGE. ee MUST TERMINATE WITH A O BYTE. 
: THE pe WILL INSERT A NUMBER OF NULL ERS 
: #NO CONTAINS THE CHARACTER TO BE 


STSTNM, a 3 DISPLAY TEST NUMBER 
SLPADR, (SP) ;FUDGE RETURN 





Tach fete Dict 














= #NO LLS CONTAINS THE NUMBER OF FILLER 
jaNOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 
- #CALL: 
:%1) USING @ TRAP INSTRUCTION 
: TYPE ,ME :;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
* i TYPE 
* i MESADR 
;% 
105737 001155 STYPE: TSTB S$TPFLG 21S THERE A TERMINAL? 
BPL 1$ ;3BR IF YES 
HALT - ay: T HERE IF NO TERMINAL 
1$: MOV RO,-(SP) es 
oo00002 MOV aetsP), RO Han GET ADDRESS OF ASCIZ STRING 
| 2g: MOVB (RO)+, ~(SP) HA ER TO. E TYPED ONTO STACK 
¢ 2s tot pa @ loi pop TT ORE THE STACK 
9° 50S: MOV (SP)+.R0 
| oo0002 3S: AbD #2, (SP)  ADIUST Ore EE TURN PC 
> ¢ 
163 000011 4S: CHPE THT, (SP) : IF <HT 
470 000200 CHEE STCRLF, (SP) ::BRANCH IF NOT <CRLF> 
470; TST (SP)+ »:POP <CR><LF> EQUIV 
47¢ TYPE :: TYPE A CR AND LF 
4705 SCRLF 
470) aR ;:GET NEXT CHARACTER 
47¢ O86652 cs: JSR PC S$TYPEC ::GO TYPE THIS ER 
4706 1154 6S: CMPB 40s«SFILLC,(SP)+ 3;1S IT TIME FOR FILLER CHARS.’ 
4705 BNE :: TF NO GO GET NEXT CHAR. 
47 1C 001:52 MOV $NULL , -(SP) ::GET # OF FILLER CHARS. NEEDED 
47] ::AND THE NULL CHAR. 
471 000001 7$: DECB =: (SP) ::DOES A NULL NEED TO BE TYPED? 
471 BLT a ::BR IF NO--GO POP THE NULL OFF OF STACK 
471 026652 JSR PC, STYPEC --GO TYPE A NULL 
471] 105337 026716 DECB § SCHARCNT ::D0 NOT COUNT AS A COUNT 
7 000 BR 7$ - + LOOP 


SEQ 0163 
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;HCRIZONTAL TAB PROCESSOR 


4 8s: MOVB 840, (SP) ; sREPLACE TAB WITH SPACE 
arte a ae t GRARICH ig AST AT 
oe eps DOP SPACE OFF STACK 
23 ier NEXT CHARACTER 
STYPEC: aSTPS ::WAIT UNTIL PRINTER IS READY 


STYPEC 
2(SP) asTPB :sLOAD CHAR TO BE TYPED INTO DATA REG. 
#15, 2tSP) : IF 


TSTB 

CMPS .s 

oe | s NOT <CR> 
BR 4 

CMPB 


£fit tsi 
S55 SSS SSSSLE 





TYPEX : :EXIT 

1$: #i2,2(SP) » BRANCH IF 
47 STYPEX - 2 <LF) 
4 (PC)+ ;; INC SPACE 
4 $C : COUNT 
4 STYPEX: RTS PC 
47 ee 
47 tht=11 
47 CRLF = 
474 
Nous ; EEE EGGERS EEE EEE EERE KE ARES EE EERE RE EEE REALE LEAS SERRA RE RREE 
42 .SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
474 -#THIS ROUTINE 1S USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
ie *#OCTAL (ASCII) R AND TYPE IT. 
ns j #STYPOS ---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
4 : 3 NUM, -(SP) ;;NUMBER TO BE TYPED 
4 * TYP CALL FOR TYPEOUT 
4 x .BYTE N ::N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
4754 x "BYTE MM ::M=1 OR O 
4 t -: 1=TYPE LEADING ZEROS 
4 i ::O=SUPPRESS LEADING ZEROS 
4 j ESTYPON---~ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
‘ j #STYPOS OR STYPOC 
u " MOV NUM, -(SP) NUMBER TO BE TYPED 
4 TYPON ::CALL FOR TYPEOUT 
4? 4 j HSTYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
4 ** MOV NUM, - (SP) ;;NUMBER TO BE TYPED 
ns! i TYPOC -:CALL FOR TYPEOUT 
4) 722 017646 000000 STYPOS: MOV 3(SP),-(SP) ::PICKUP THE MODE 
4 7e6 11 990601 027145 MOVB 1(SP),SOFILL ;;LOAD ZERO FILL SWITCH 
4771 7394 112637 027147 MOVB § (SP)4+°SOMODE+1 ;;NUMBER OF DIGITS TO TYPE 
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BINARY TO OCTAL (ASCII) AND TYPE St@ 0165 


16 ooooc2 a00 #2, (SP) . ADJUST RETURN ADDRESS 
goons wit STYPOC: MOVE #1, ILL -:SET THE ZERO FILL SWITCH 
14 MOVB =, +) ::SET FOR SIX(6) DIGITS 
900005 027144 STYPON: MOVB 85, SOCNT : SET THE ITERATION COUNT 
MOV R3;-(SP) + 
MOV RY’ -(SP) : SAVE RY 
MOV RS, -(SP) - SAVE RS 
027147 HOVE SOMODE +1, R ::GET THE NUMBER OF DIGITS TO TYPE 
ADD #6, R4 ; s SUBTRACT i FOR MAX. ALLOWED 
i MOVE = R4; SOMODE ::SAVE IT FOR USE 
145 MOVE § SOFILL,RY ::GET THE ZERO FILL SWITCH 
000012 MOV 1e(SP), RS : PT THE I 
CLR : CLEAR THE 
1S: ROL RS ::ROTATE MSB INTO “C” 
BR 3$ GO DO MSB 
25: ROL RS ::FORM THIS DIGIT 
ROL RS 
ROL RS 
MOV RS,R3 
3S: ROL R3 ::GET LSB OF THIS DIGIT 
027146 DECB # SOMODE :: TYPE THIS DIGIT? 
BPL -:BR IF NO 
177770 BIC #177770,R3 ::GET RID OF JUNK 
BNE »: TEST FOR O 
TST ::SUPPRESS THIS 0? 
BEQ cS -:BR IF YE 
4$ INC »:DON’T SS ANYMORE 0’S 
BIS #’0,R3 ::MAKE THIS DIGIT ASCII 
S$ BIS #’ .R3 - > MAKE 2 ge NOT ALREADY 
14 MOVE RG, BS ::SAVE FOR TYPING 
14 TYPE a¢ : GO THIS DIGIT 
7144 7S: DECB 4 =-«SCCNT -:COUNT BY 1 
» 3GT -:BR IF HORE TO DO 
BLT 6S ::BR IF 
INC RY ‘: INSURE LAST DIGIT ISN’T A BLANK 
BR cS $3 i aaa DIGIT 
6$: MOV (SP)+,R5 ; RES ae | 
MOV (SP)+,R4 : REST RY 
126 MOV (SP)+,R3 > :RESTORE RG 
oo0002 000004 MOV 2(SP).4(SP) :tSET THE STACK FOR RETURNING 
MOV (SP)+, (SP) 
RTI » sRE TURN 
Qs: .BYTE 0 : STORAGE FOR ASCI! DIGIT 
"BYTE 0 :: TERMINATOR FOR TYPE ROUTINE 
SOCNT: .BYTE 0 ::OCTAL DIGIT COUNTER 
SOFILL: .BYTE O >> ZERO FILL H 
: :WORD O ::NUMBER OF DIGITS TO TYPE 


x SR ESE EEE EE EE EE J SA A eA EEE HEE REE 
.SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 
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DZCDB.F11 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE SEO 0166 


-#THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A S-DIGIT 


Te Postrive OF NEGATIVE. sPuCe bh ARTS ctGN Witt BE TYPED 
THE 1 DIGI OF . LEADI 









-#SI 
x bad FIRS! DIGIT NG ZEROS WILL ALWAYS BE 
k : #CALI.: 
3c : MOV NUM, -(SP) ::PUT THE BINARY NUMBER ON THE STACK 
33: : TYPOS ::GO TO THE ROUTINE 
336 STYPDS: 
a3 MOV RO, -(SP) - PUSH 
3. MOV Ri’ -(SP) >: PUSH 
|3€ MOV Re, -(SP) - « PUSH 
335 MOV R3,-(SP) : ;PUSH 
7 MOY Baap csp) SET 
; pede | Bapoeo MOV sehen, 5 teeT THE I 
3 BPL 1$ ::BR IF I 
gus 000055 000001 MOVB = #’-, 1 (SP) RAKE 
| 1$: CLF s3ZeRe 
2 oa Pa 
4 in HOV a’ | (R3)+ jiSeT 0 A BLANK 
SC 027354 MOV SOTBL (RO) Rls; 
9 | 3$: SUB i. ee 
3 BLT Ug ::BR IF DONE 
$ INC :: INCREASE THE BCD DIGIT BY 1 
355 4§$ ADD R1,R5 ::ADD BACK THE CONST 
35¢ TST Re ::CHECK IF BCD DIGIT= 
97 BNE c$ ;;FALL THROUGH IF QO) 
es ISTe (SP) jiSTTEL DOING LEADING 0’S 
36C SS: ASLB  s-«¢ SP?) j 5D? 
86 Bcc 8— «GS ;;BR_IF_NO 
b¢ 1 177777 MOVE 1(SP),-1(R3)  ;;YES--SET THE SIGN 
3 6S: BIS #'0,Re -: MAKE THE DIGIT ASCII 
864 0 7$: BIS #’ (Re ::MAKE IT A IF NOT ALREADY A DIGIT 
365 NOVE Re, {R34 ss RUT THIS CHARACTER IN THE OUTPUT BUFFER 
67 000010 CMP RO, #10 3 cK The EAL E NDEX 
3 BLT 25 : G0 NEXT DIGIT 
365 BGT 9$ : G0 0 EXIT 
if eS we 55 GET Tce 70 ASCII 
ie BS TSTB (SP)+ jsHAS THE LSD THE FIRST NON-ZERO? 
3 177777 177776 MOVE § -1{SP),-2(R3) ;;YES--SET THE SIGN FOR TYPING 
: 95: CLRB (3) ::SET THE TERMINATOR 
th MOV (SP)+,R5 -:POP STACK INTO RS 
af é MOV (SP)+,R3 -:POP STACK INTO R3 
7€ MOV (SP)+)Re ::POP STACK INTO Re 
879 MOV (SP)+,R1 -:POP STACK INTO Ri 
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012600 








{ l2 
38° 000004 
+ 

99} 

Ps 

39. 

+ 

As 

# 

x 

x, 

0 10046 
0! 

"sk 

49¢ 

US 
106 027414 

, 
308 

5 

if 

: ? 


6 ~~ a ean 
UPTON " 


£n2 ie 
<¢ ~¢-y*-4? 
5 “OU 


MACY11 27(654 


; 2 
T BINARY TO DECIMAL 


000002 


027416 









-JUL-77 08:39 PAGE 95 
AND TYPE ROUTINE 
MOV (SP)+_RO ::POP STACK INTO RO 
TYPE $DBLK - « NOW TYPE T NUMBER 
HOV 3(SP),4(SP) : :ADJUST TACK 
(SP)+’ (SP) 
RTI RETURN TO USER 
SOTBL: 10000. 
1000. 
100. 
10. 
SDBLK: .BLKW 4 
5 Se See SE Ak SE AE SE HE EE EAE ER HEHE ERE EE EEE ERE EE 
_SBTTL TRAP DECODER 
-¥THIS WILL PI THE L YTE OF THE “TRAP” 
a Ee ahi te Teen aR TaaCe COR THE STARTING B 
THEN USING THE ADDRESS OBTAINED IT WILL 
580 THAT 
can MOV RO, -(SP) - SAVE RO 
MOV 2(5P) RO ::GET TRAP ADDRESS 
TST -(RO) : BACKUP BY e 
MOVE (RO),RO ::GET RIGHT BYTE OF TRAP 
ASL RO ::POSITION FOR INDEXING 
MOV STRPAD(RO),RO ;;INDEX TO TABLE 
RTS RO --GO TO ROUTINE 
_SBTTL TRAP TABLE 
[THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
‘BY THE “TRAP” INSTRUCTION. 
: ROUT INE 
$TRPAD: 
STYPE ;;CALL=TYPE TRAP+0(104400) TTY TYPEOUT ROUT 
STyPOC j CALL =TYPOC TRAP+! (104401) te OcTAL iN ig TH 
TYPOS ;;CALL=T TRAP+2( 1 ) ays 
TYPON ;; —_ TRAP+3( 1 ) T CALL) 
TYPDS ;;CALL=T TRAP+4( 1 ) CThAL Bt H SIGN) 


Pisa srosleetoe eat ia 
.SBTTL POWER DOWN AND UP ROUTINES 
;POWER DOWN ROUTINE 





$PWRON: MOV I ;:SET FOR FAST UP 
MOV -:PRIO:7 
MOV RO, :: PUSH RO ON STACK 
MOV Ri’ ::PUSH RI ON STACK 
MOV Re’ :: PUSH Re ON STACK 
MOV R3, ::PUSH R3 ON STACK 


SEQ J16: 
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POWER 


OZCOB.Pi1 





) DD DO. > 
- FUSS 


SSIS S935 555 55 
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DOWN AND UP ROUTINES 





: 
E 


Se 


_ 
a 
ae 


es 


a" 











RY, -(SP) ;;PUSH RY ON STACK 
Re’ - (ep) -:PUSH RS ON STACK 
SeeRRY Sepunvec’ : set BP VECTOR 
e ;;HANG UP 
Ssavnt MRT L FUR THE TTY 
Seine 7 5 WA T NC 

i 


ee 
| 
8 
i 
* 
ie 


ae" 
BEREE 


= 

D 

+ 
3 


¥ 
8 


WAS STARTED 


i ; SPEFORE TH "POUER DON WAS COMPLETE 


“ATTEMPT TO RESTART LAST SECTION 
BEING RUN BEFORE POWER FAILURE 


i" ee 3 


SEQ 0168 


oo 


_—— 
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DATA TABLES 
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| 
| 


x wuUmMmT in.ot. wmoOTiNwor. ums 
HUMTNWKOCODWOWOwoOOW —wUmnTNworwoOCwoowwowq 
tucutu 
ee eed eed 


— 
CU CUCU CU CUCU FU CUCU CUCU 4 tt st tt st tt tt st ttt UNMTWWKR OOYwOMONDwDMcd 


-_ 


- * 
Rees ove tes i SMI ZTOCGE MRK ee ON’ MR DS SEK NG OE AO: 


RUE UNINC ite a et ta a RETO CUO OI FREDDIE FP ee ee 


IC DECK DATA TABLE 


{CARD IMAGE FORH 
ALPpco: 4000 


cine 


;DATA TABLES FOR DATA RELIABILITY TESTS 
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MAI - 11 - OZCDB-B MACY! (654) 1-JUL-77 08:39 PAGE 38 
pzCbe Pi DATA tees SEQ 0170 
: 0000 749 SPACE BLANK 
Te00 ae : 
30100 :52 3 3 
40040 -53 “ 44 
$0020 -S4 S 5 
£0010 -5S 6 6 
70004 -S6 7 7 
oo -57 3 8 
1 -S8 9 3 
20202 -S9 : 82 
301 -60 x 8 3 
-61 a 84 
S002e2 -62 : 8S 
60012 -63 = 8 6 
70006 -64 Vs 8 7 
4000 -65 & le 
14400 -66 a le 1 
ated °67 8 le 2 
1 °68 C le 3 
63 0 le 4 
1 -71 le 6 
74004 -7e G le 7 
4002 °73 H le 8 
4001 274 I le 93 
ts :75 [ le 82 
102 °76 , le 8 3 
44042 -77 < le 8 4 
54022 fe ( 1 85 
ALPEND: Mi : 90 ; le 4 : 
s ALPHANUMERIC DECK DATA TABLE 
-THE VALUE IS THE ENCODED FORM OF THE DATA 
- COLUMN ASCII PUNCH 
ALPCDP: .BYTE 200 1 & 12 
‘BYE 308 le Be 
; 7J B le 2 
-BYTE 74 C le 3 
‘BYE ew 15 
: : le § 
-BYTE 206 7 F le 6 
BYTE 207 ig G is 7 
; 210 . H le 8 
-BYTE 220 710 I le 9 
1s y Me ele s11 [ le 82 
it ; 213 -le ; le 8 3 
14 -BYTE 214 713 < le 84 
1S gt 215 714 ( less 
18 .BY 216 -15 4 le 86 
.BYTE 217 -16 ' le 8 7 
] -BYTE 100 717 - ll 
101 .BYTE 101 :18 J EE 3 


005 04ers, am 


C14 


‘| 


f 


SEO Ol 


ha in 11 - DZCO8-8 wen ee 1-JUL-77 08:39 PAGE 99 


wumTiNwr. unsMNwK 


CUM FLO 

i eta Ne eS dininiimmeaaal Ue FLO ccucucucucucucu 
“4 

sats ees e e009 0000000000000H8 MT Nr OT MNMMMA AAA 


SM JEZOLOL HMR ee ON UE DS SKN OS ea @Ca- US SGACMOOCOUWLO 


CRAG TBORAGS ASS BSET TS PPT PS RAPA RAS SISS SESS L 


COMM sr MNwr =) 
Se RSS sy PT PPS REMRRAR cums non See URE 


: fe 
Sasaqagassssssasstssasssassssssssssssaasassasasa aaa 





USES IRI Ie eyo Tees RamaE a QUT SITs 


a ie fon i i. i ees src IC BC UC UC IC ICIC OC UC IC IC COC OC UC OC OC COC CL ooncW) 





D4 





MA - 11 - DZCDB-B MACY! (654) i-JUL-77 08:39 PAGE 100 
oCOBe il DATA tpBLes SEQ 0172 
1 -BYTE 210 :73 H le 8 
| a ant 
i BYTE el :76 iS BS 
rf ae a iO 
rt BYTE Sie :79 + l2 8 6 
144 ALPENP: .BYTE 217 -80 : le 8 7 
136 sBINARY DECK DATA TABLE 
4 . COLUMN PUNCH 
BINCD: 0 1 BLANK 
1 1-4 
e :3 
e000 ig 
60010 °c 
$0020 -6 
40040 7 
30200 ‘8 
10400 710 
1900 ii 
2000 -le 
iT °13 
171111 -14 
172222 715 
173333 -16 
174444 217 
175555 -18 
176666 -19 
177777 -20 
ey sel 
l6lele sec 
171313 -23 
171414 -24 
171515 -e5 
171616 -2b 
171717 -27 
raat: 58 
\7elel 729 
1 1 3 -30 
17 -3l 
1 sae 
i AC 
1 172727 34 
173532 -37 
173434 ; 38 
i 173535 -39 
; 173636 -40 
173737 4} 
1 44040 -4O 
I 174141 43 





3h 
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D0ZCOB.P11 DATA TABLES SEQ 0173 

164242 -44 
174343 34S 
174S4S iG 

174646 74 
Ep ae a 
13 1 :50 
: 351 
{peu 2g 
ie ied 
1 eeae0 :56 
ifeseh 397 
ese 2g 
176464 :60 
Ui ire? -61 
$ 5 
2 177171 -64 
r, 1 ;65 
“¢ 177373 ;66 
> 177474 °67 
3c 1° 177575 ;68 
5e1f 177676 ;69 
4h 30101 ;70 
2 20202 “71 
Ee i “73 
+ 170606 ;75 
: eae a 

+ 190123 
=r: 177654 -79 
BINEND: 174567 -80 


sBINARY DECK DATA TABLE 





The VAL rigy THE yENCODED VALUE, WHICH ORS THE OCTAL REPRESENTATION OF 

COLUMN ASCII PUNCH 

BINCDP: .BYTE 0 -i SPACE BLANK 
BYTE 20 2 9 9 
; 10 .3 8 8 
eYTe 7 74 7 7 
-BYTE 6 2S : 6 
ETE ; ie 4 ; 
“BYTE 3 4°) 3 3 
"BYTE 2 -g 2 2 
.BYTE 1 -10 l i 
-BYTE 4 ell 0 0 
“BYTE 100 -12 - 11 
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OZCOB.P11 DATA TABLES SEQ 0174 





: 200 -BYTE 200 -13 8 12 
ve re .BYTE ti te 
+. BYTE 1 =] 
34 Wy ‘BYTE 207 31? 
48: Be 3 
+, ; -20 
369. -BYTE 6 qt 
3055 O77 ‘BIE 3 -O3 
325 7 .BYTE 47 -24 
+ 7 "BYTE 67 : 2S 
52¢ ao -26 
305% BYE 35 -27 
450 105 -BYTE 105 28 
326 1 “BYTE 127 23 
= | ae f 
ae | é ; 
+14: 7 ‘Bre 153 36 
326) 137 -BYTE 137 - 34 
+4 147 : 147 °35 
¥. 7 aut 167 36 
e : 157 : 
+ : 147 38 
ier arte 167 -39 
‘Bye 7? a 
YE 34 : Yo 
oe i 3 


S3533 
Hon 
“J 

WELLE 


mm 


RAIS NRSES 


;51 


PEELELEEEREDEEEEREE! 
RREA TO SN Mn Nn 


317 . 
337 

307 : 
327 : 
337 : 
si7 : 
367 . 
357 : 
377 . 
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DATA TABLES 





. a 


R 


051101 STADDR: I <15><12>"STARTING ADDRESSES ARE:” 


OZCDB. P11 SEQ 0175 
7 : 347 367 
7 ‘BME 367 ;68 
7 .BYTE 357 368 
‘BIE re :71 
-BYTE 33 ;72 
-BYTE 7 °73 
x As) me a -74 
ly -BYTE 37 376 
-BYTE 146 377 
* BYTE 37 -78 
* BYTE 347 -79 
* BINENP: .BYTE 237 : 80 
x ASCII / / 
x ASCIZ / / 
* “ASCII <12><12><12> 
>: “ASCIZ <15><12> 
>: (ASCIZ <15><12><12>"MAINDEC-11-DZ2CDB REV. BY<15><1l2> 
+ 
4, } 
=) 
+ 
: 


-ASCII <15><12>"200 = INSTRUCTION AND DATA TEST” 


ae oe ae ad ~~? ~?-x7 xt «tf +? ~< 
= = 


Pt. be fe ++? 


~e - 


a 
ee Be Se Se 


> 
- 
7 


-ASCII <15><12>"210 = ERROR FUNCTION TEST (M-1000/M-200)” 


- af. 00 bt. Of. Oe 
sm 


a 
— wad 


> °* ~~ bd 
7 >. = 
ma at +- + 
oe 


- - - - 
: 


Pee ot SL. stadt deadead tad Eadeadtadead Cad Lad Cad! 
EE 


LASCII <15><12>“220 = SINGLE TEST LOOP” 


-ASCII <15><12>"240 = READ SINGLE DATA PATTERN TEST” 





Hitt 
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TABLES 







02C08.P11 DATA SEQ 0176 
047122 OS2040 051505 
eB: Ais o31012 030065 (ASCIZ <15><12>"250 = ERROR FUNCTION TEST (N-1200)" 
122 
i 
2 
af 1061 


Ss 


o 


1 POWMES: .ASCII <15><12><12>"POWER FAILURE OCCURRED - WILL ATTEMPT TO 


=N 


hs 


> 


Arrieta 
re 


iat 
~* 


-ASCIZ <15><12>"RESTART SECTION OF PROGRAM FORMERLY IN USE"<15><le> 


Laas i 


MLOGIC: .ASCIZ <15><12>"ENTERING LOGIC TESTS” 


MDATA: .ASCIZ <15><12>"ENTERING DATA TESTS” 


sn 
o 


e 


MI200E: .ASCIZ <15><12>"ENTERING M1200 ERROR FUNCTION TESTS” 


MIOOOE: .ASCIZ <15><i2>"ENTERING Mi000/M200 ERROR FUNCTION TESTS” 


APRSRE 
oEFe- nee 
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0ZC08.P11 DATA TABLES SEQ 0177 


MLOOP: .ASCIZ <15><12>"ENTERING A LOOP ON TEST SELECTED BY USER™ 


MPATS: .ASCIZ <15><12>"ENTERING SINGLE DATA PATTERN TESTING™ 











1505 MSGi: .ASCIZ <15><12>/PRESS CARD READER ’RESET’/ 








> 
a‘ ruc 


. --« 
7 ++ 
- 


mSG2: .ASCIZ <15><12>/THEN CONTINUE DIAGNOSTIC FROM CPU CONSOLE/ 


’ ‘4 ; 
Ys 
- ?. bi ee re 


a 
atx 


> o. 
- 


MSG3: .ASCIZ <15)<12>/PRESS CARD READER ’STOP’/ 


£z -_ 
sm | 
tat ttt RT A At 


1 
11 
as MSG4: .ASCIZ <15><12>/THE INTERRUPT LEVEL WAS / 


hl = : ~ 
: om : : ae ry 
’ = = 4’ 
: 7 ’ ' ' ¢ 


7 





+ 
| 
' 


ae. of. bh 
~~? ~ 
v0 


Bus MSGS: .ASCIZ <15><12>/REMOVE ALL CARDS FROM THE INPUT HOPPER/ 


ee Pe Pe. Ue Oe 
yy 
' 


1 MSG6: .ASCIZ <15><12>/RESTORE CARDS TO THE INPUT HOPPER/ 
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RRR eRE 
~~ na Pal 


™N 


Vauz 


PUP PA Os Pe ee Ta 


> *) wax? yet 


yr? wf - 


aX 


x 
: 
: 












= 
a” hee 


Lunn 


_— 


= = = = - = 7 
. . 


—* 
j= ; 


3 


i’ 
o 


— — com a -_— = can 
e 
om = 


oe ; 7 
SS Foro! 
Tteth tat 
B 
pe 


RIO 
= Se 


> 





fw 
-_ 


ya £7 


- » -_— = = - - _ 
a a 
: ; 


a re 
are 
sw fuwits 


-_ 


17 
Ht 





MACY11 27(654) 
DATA TABLES 


le 
4 


7 


Seer 
One o 


FET? 
5 Eue 
On 


ee 2. OF Be 2 Be 2S Be Se Se he UR UG. UDG Ue 
‘ rattati 
_— 
- 
sti Pent 


en 


R 
™“N 


™~ 
a 
Sh 


2 
R Eeenns 


Seen 2 
Me <= rebe he bos we — 
oe RuRtne nse 


= 
or 


B= 
RE 
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MSG7: 


ASCII 


-ASCIZ 


-ASCIT 


.ASCIZ 
.ASCIT 


-ASCIT 


.ASCIZ 


<15><12>71. PULL OUTPUT STACKER PRESSURE ARM DUWN / 


¢15><12>/UNTIL HOPPER CHECK LIGHT COMES ON/ 


¢15><12><12>72. RELEASE STACKER PRESS. ARM/ 


<15><12><12>/HOLD DOWN THE SWITCH UNDER THE CAP OF THE INPUT / 


/HOPPER/ 
<15><12>/TEAR OFF A PIECE OF CARD AND SLIP IT IN/ 


¢15><12>/FRONT OF THE PHOTOCELL/ 


¢15><12) 
(18) «13> /CAUTION: MOVE YOUR FINGERS AWAY FROM THIS / 


/AREA BEFORE CONTINUING? / 


SEQ 0178 






K14 
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OZCOB. P11 


MSGIO: .ASCIZ <15><12><1@>7!!! WRONG RESPONSE TRY AGAIN !!!/ 


MSG11: .ASCIZ <15><12>/HOLD THE OUTPUT STACKER GATE OPEN. THEN/ 


MSGl2: .ASCII <15><12>/ DARK-LIGHT CHECK / 


,ASCII <15)><12>/1.£. - TEAR A CORNER OFF A CARD AND PLACE IT/ 


+ 
“ 


tote de 
- -<? 


pA, AL AL aA a a Aa 


5 
ERE 
ee 
Ss! 
222e 
Se 


PRT rs a 
Apt 
AERO 

Mr EC 
£ 
3 bbe 

em 
on 


-ASCIZ <15><12> /AT THE BOTTOM OF THE INPUT STACK/ 


+ - 
ai 

—_ = 
"i 


rade 
Saath} 
at 


: ’ : ; | 
$rAote 7 Ho-4o_4¢-40. 
: : : 7 : : 

-. 


2017 ENE «MSGI3: .ASCIZ <15><12>/DECK § CARD NUM CARD COL SHB  WAS/ 
55 el 2¢ 
we, be tia ’ 
+ 95 11C o4 
020114 
willie 
UNE l 
MeIC bay 13 MSGI4: .ASCIZ <15><12>/ALPHA / 
m4i0i2 O47111 MSGIS: .ASCIZ <15><12>/BINARY/ 
a8 
4450; » .ASCIZ <15><12>/BIT 15 WAS SET/ 
pees 0124 MSGI6: .AS 


BIC MSG17: .ASCII <15><12>/REMEDY THE CONDITION BY RELOADING INPUT HOPPER/ 


— 4 
tad | a ae 
SROBE 
—-O-— 
TAO 
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DATA TABLES 


OZCOB.P11 SEQ 0180 


1 -ASCII <15><12>/WITH CARD DECK - PRESS "RESET’ BUTTON/ 


440 .ASCIZ <15><12>/70N CARD READER AND *CONTINUE’ SWITCH ON CPU PANEL/ 


iil 


MSGI8: .ASCIZ <15><12>/CARD READER IS OFF-LINE/ 


MSG19: .ASCIZ <15><12>/ COL. WAS CARD NUM. ERRORS/ 
MSG20: .ASCIZ <15><12@>/PUT ANY TWO CARDS IN INPUT HOPPER/ 


MSG21: .ASCIZ <15><12>/PRESS END OF FILE BUTTON/ 


~ ae oe Oe Be OE RE hE UR hE UE OE UE FE 
> * , * <@ o ~ 





mSG22: .ASCII <15><12>/1. PUT "HALT’SW. DOWN AND PRESS/ 
440 -ASCII <¢15><12>7 CONTINUE ON THE CONSOLE UNTIL/ 


I 117 
35, ] ¢ 
90501 7440 ASCII <15><12>7 ONE OR MORE CARDS ARE READ. / 
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DATA TABLES 


.ASCIZ 


-ASCIT 





SEG 0181 


<15><12>" (FOR THE 11/34 PRESS HLT/SS)™ 


<15><12><12>72. THEN RESTORE HALT SW. TO NORMAL POSITION/ 


<15><12>7 AND CONTINUE DIAGNOSTIC FROM CPU CONSOLE/ 


<15><12>" (11734 PRESS CNTRL & CONT SIMULTANEOUSLY)” 


¢15><12>"LOAD THE ADDRESS OF THE DESIRED TEST INTO THE” 


(15><12>"SWITCH REGISTER - I.E. THE ADDRESS OF THE SCOPE” 


(15><12>" INSTRUCTION AT THE BEGINNING OF THE TEST” 








a; 4 





MSG24: 
ll 
a 
mMSG2S: 


Oro 
~~ 


= 


oa zeke 
Sons 


-ASCIZ 


-ASCII 


-ASCIZ 


-ASCIT 


-ASCIT 


»ASCIZ 


.ASCIT 


-ASCIZ 


N14 


1-JUL-77 08:39 PAGE 110 


(15><12>"THEN PRESS CONTINUE SWITCH" 


¢15><12>"SET DESIRED SWITCH REGISTER OPTIONS” 


¢15><12>"THEN PRESS CONTINUE SWITCH” 


(15><12>"LOAD DESIRED PATTERN VALUE INTO THE SWITCH™ 


415><12>"REGISTER - I.£. INTO SWS<1i:0>” 


(15><12>"THEN PRESS CONTINUE SWITCH 


(15><12>/THIS TEST VERIFIES THE ABILITY OF THE/ 


<15><12>/RS1200 TO DETECT MIS-REGISTERED CARDS/ 


SEQ 0182 


B15 
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OZCDB.P11 DATA SEG 0183 


-ASCII <15><12>/MAKE AND THEN PLACE A SPECIAL CARD INTO THE INPUT/ 


.ASCIZ <15><12>/HOPPER. REFER TO SECTION 6.3 OF LISTING FOR DETAILS/ 


ASCIZ <15><12>/"READ CHECK LIGHT” SHOULD BE BLINKING/ 


.ASCII <15><12>/PRESS “RESET” TO REPEAT ERROR/ 


-ASCIZ <15><12>/FUNCTION TEST AGAIN/ 





-ASCII <15><12>7I1S THE CARD READER UNDER/ 


.ASCIZ <15><12> /TEST MODEL RS-1°007(Y OR N)/ 


— 








eed i 11 - DZCO8-8 ey ee 1-JUL-77 08:39 PAGE wel — 


TA: ; 024516 








MSG31: .ASCII <15><12>/AT THIS TIME SET THE APPROPRIATE/ 


- _ -_ 7 ~~ 
> 
ys * 
. a 
~ 


{ 
: 


-ASCII <15><12>/SWITCHES ON THE SR. (REFER TO THE/ 


tm 
<f,1 


.ASCIZ <15><12>/DOCUMENTATION ON SWITCH REG:STER SET! INGS)/ 


ane 2s =. «= «a «= = = «= = = = 
«* : * «+ > ’ 


MSG32: .ASCIZ <15><12>/TST33 DATA LATE TEST/ 


MSG33: .ASCIZ <15><12>/TST34 OFF-LINE TEST/ 


MSG34: .ASCIZ <15><12>/TST3S SPECIAL INT. COND. TEST/ 


eas was Pi Ay * Ay OeE vue Ths O' A,"Ay A, Ay Ay AY Ay 
So | > 


MSG3S: .ASCIZ <15><12)/TST36 HOPPER EMPTY TEST/ 


; : : 
Ay Ay Ay Ay Ay +e AO 
a i an ie —~—¢ ~@* = 


MSG36: .ASCIZ <¢15><12>/TST37 STACKER FULL TEST/ 


MSG37: .ASCIZ <15><12>/TST4G PICK CHECK TEST/ 


Ay Ay as Rg A Ay ay a AG 
~?+ 


MSG38: .ASCIZ <15><12>/TST4¥1 STACKER ERROR TEST/ 


ag ee ke 
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OZCOB.P11 DATA TABLES SEQ 0185 











h 


Ye 


sASCIZ <15><12>"INITIALIZATION PULSE” 


EMe: .ASCII “COLUMN COUNT REGISTER (CDC) NOT CLEARED BY” 


EKER RRNRE LA Sc 


ley MSG39: -ASCIZ <15><12>/TST42 EOF & HOPPER CHECK/ 
ap : 7 
= 
BY; a MSGHO: .ASCIZ <15><12>/TSTY3 DARK-LIGHT CHECK/ 
584 
eed 
285 | 1 
28S¢ a4 MSGHI: /ASCIZ <15><12>/TSTH3A MIS-REGISTERED CARD TEST/ 
aay 
385! 11 105 
085) 1 104 
85% . EVEN 
286 } ;ERROR ITEMS MESSAGE TABLE 
286. 1g25 EMI: — .ASCIT “STATUS REGISTER (CDS) BITO7 NOT SET BY" 
= 
; 
+. 
S 
~ 3 
af 
SI 
2 
= 


JASCIZ <15><12>"INITIALIZATION PULSE” 


EMS: -ASCII “BUS ADDRESS REGISTER (CDA) NOT CLEARED BY” 


BSRz 
Sof Rome 





Hiss 2! Gateke: E Caee 


Aes Ay Ay Ay 4s 4e Ay Ay AS As"Ay As 


a re 


— 
™~ 












OZCOB.P 


> ¢+ 
> 


ala'’atelimiata’a 
: = - 


Ss 


C.OD0DDDDDDD0.0D4 


: 
im ai an a 


<~<@ wz 
44 hh te ate 


Hat oe * 


ax 


‘0... 0.0L 


et 56.50, 50.30. 90. 80. Ot SE TUT LIT ADE LD! 
* > 7 _ 


PY - 





= i 
—T 


+ 
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051101 


ENA ror 


WGI 





a 


EIS 
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EM6: 


EMIO: 


-ASCIZ 


-ASCIZ 


-ASCIT 


-ASCIZ 


-ASCIZ 


.ASCIT 


SEQ 0186 


<15><12>“*INITIALIZATION PULSE” 


“STATUS REGISTER CONTENTS INCORRECT™ 


“COLUMN COUNT REGISTER (CDC) NOT ABLE TO” 


<15><12>"BE LOADED WITH ALL ONES” 


"COLUMN COUNT REGISTER (CDC) NOT CLEARED” 


(15><12>"BY POWER CLEAR” 


"BUS ADDRESS REGISTER (CDA) NOT ABLE TO BE” 


(15><12>"LOADED WITH ALL ONES” 


“BUS ADDRESS REGISTER (CDA) NOT CLEARED” 









MAINDEC - 11 - OZCDB-6 
OZCOB.P11 


s 


ne 


7 ~ > * 


I I+ S*™Y 


> - ~~, ? 


Meet ta ae Saba hee 


~ 


=] 


ee 


patton 
NSZe=h 


a 








F1S 


1-JUL-77 08:39 PAGE 115 


EM11: 


EMle: 


EM13: 


EM14: 


EMS: 


-ASCIZ 


.ASCIT 


-ASCIZ 


.ASCIZ 


-ASCIZ 


(15><12>"BY POWER CLEAR” 


“CONTROLLER READY DID NOT CLEAR ON™ 


<15><12>"READING A CARD” 


“CONTROLLER READY DID NOT CLEAR BITOO” 


(15><12>"0F STATUS REGISTER (COS)” 


“CONTROLLER DID NOT SET WITHIN 1 SECOND” 


"ERROR (BITIS) SET IN STATUS REGISTER (CDS)” 


“BIT OR BITS SET IN STATUS REGISTER (CDS) THAT” 





ey eS a hy ay “ty “ty 
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0ZC08.P11 









EM16: 
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-ASCIZ 


-ASCTI 


-ASCIZ 


-ASCIT 


-ASCIZ 


-ASCIZ 


.ASCIZ 


-ASCIZ 
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<15><12>"SHOULD NOT BE” 


“BUSY SET IN STATUS REGISTER (COS)” 


<15><12>"1T SHOULD NOT BE” 


“RESTORING CPU STATUS AFTER READING A CARD” 


<15><12>"CLEARED CONTROLLER READY IN STATUS REGISTER™ 


"NO INTERRUPT OCCURRED” 


“AN INTERRUPT OCCURRED - SHOULD NOT HAVE” 


“INTERRUPT ALREADY OCCURRED AT A HIGHER LEVEL” 


SEQ 0188 


H1S 
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pata 05i124 €M23: .ASCIZ “CONTROLLER READY NOT SET™ 
14 Oe0lee 


ish ees 





.ASCIZ “INTERRUPT ALREADY OCCURRED AT A LOWER LEVEL" 


.ASCIZ “AN INTERRUPT OCCURRED AT TWO DIFFERENT LEVELS” 


OY 122 EM26:  .ASCII “ERROR (BITIS) NOT SET IN STATUS REGISTER (CDS)" 
™ S$ 1 l 

tn Lit 

Ht 

di 

in 

440 ASCIZ <15><12)"IT SHOULD BE” 

OM 030104 

nC gus EN27: ASCII “NON-EXISTANT MEMORY (BITO9) NOT SET IN™ 
ith 

aur bs 

D408 047040 

40 052105 


-ASCIZ <15><12>"STATUS REGISTER (CDS) - IT SHOULD BE” 


Ht 
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40 
‘ 
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wR 
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o > co -_ 
— 


cet EM30: .ASCII “EXTENDED MEMORY (BITOS) NOT SET IS STATUS” 
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#2 
= 
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EM3e: 


EM33: 


-ASCIZ 


-ASCIZ 


-ASCIT 


.ASCIZ 


-ASCIT 


-ASCIZ 


(15><12>"REGISTER (COS)" 


“EXTENDED MEMORY (BITO4) NOT SET IN STATUS” 


(15><12>"REGISTER (CDS)" 


"CONTENTS OF BUS ADDRESS REGISTER (CDA)” 


(15><12>" INCORRECT” 


“CONTENTS OF COLUMN COUNT REGISTER (CDC)™ 


(15>< 12>" INCORRECT” 


"READER OFF-LINE BUT CARD READER ERROR” 


(15><12>"(BIT14) NOT SET IN STATUS REGISTER (CDS)” 





SEQ 0190 
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EM36b: 


EM37: 


EM4O: 


EM41: 


EMY2: 


-ASCIZ 


.ASCIZ 


.ASCIZ 


-ASCIZ 


.ASCIZ 


-ASCIT 


“NO TRANSITION TO ON-LINE (BITO3) OCCURRED” 


<15><12>"IN STATUS REGISTER (vDS)” 


"CONTENTS OF STATUS REGISTER #2 (CDD) INCORRECT” 


"NO INTERRUPT WITH PROCESSOR AT LEVEL 0” 


“DATA LATE (BIT1O) NOT SET IN STATUS REGISTER (CDS)" 


“OFF-LINE (BIT12) NOT SET IN STATUS REGISTER (CDS)” 


“OFF-LINE (BIT12) SET IN STATUS REGISTER” 


SEQ 01931 
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EMY6: 


-ASCIZ 


-ASCIZ 


-ASCIZ 


-ASCII 


-ASCIZ 


-ASCIT 


-ASCIZ 


<15><12>" - IT SHOULD NOT BE” 


"PICK CHECK (BIT13) NOT SET IN STATUS REGISTER #e (COD)” 


“STACK CHECK (BIT12) NOT SET IN STATUS REGISTER #e (CDD)" 


"END OF FILE (BIT13) SET IN STATUS REGISTER (CDS)” 


<15><12>" - IT SHOULD NOT BE” 


"READ CHECK (BIT14) SET IN STATUS REGISTER (CDS)” 


<15><12>" - IT SHOULD NOT BE” 


SES 019e 


a 





| Lis 
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SEQ 0193 


2 
gh 
x 






EM47:  .ASCII “HOPPER CHECK (BITO2) SET IN STATUS REGISTER (CDS)” 


9 
“SEEES 


> 
© +. Pat yr? 


.ASCIZ <15><12>" - IT SHOULD NOT BE” 


OOO 
o* o* e+ a4 2+ @* «4% 


. ee 


-ASCII “END OF FILE (BIT13) OF STATUS REGISTER (CDS) NOT SET” 


.ASCIZ <15><12>" - IT SHOULD BE” 


PEETEEPrrre. 
+ —— SS 


oe — ='« = 


EMS1: .ASCII “READ CHECK (BIT14) OF STATUS REGISTER (CDS) NOT SET™ 


-ASCIZ <15><12>" - IT SHOULD BE” 


EMS2: .ASCII “HOPPER CHECK (BIT12) OF STATUS REGISTER (CDS) NOT SET” 


OEE fotototototatotoeaeatae 


“peeks 
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535 
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ane 
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o 3b‘ 
370 .ASCIZ 
&14 . 

37 7 
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; 
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<15><12>" - IT SHOULD BE” 


“END OF FILE (BIT13) OF STATUS REGISTER (COS) DID NOT” 


<15><12>"CLEAR WITH TRANSITION TO ON-LINE" 


“READ CHECK (BIT14) NOT SET IN STATUS REGISTER #e (CDD)" 


“CARD READER ERROR BUT NOT BOTH CARD” 


“CARD READER ERROR BUT NOT OFF-LINE” 


“END OF FILE (BIT13) ERROR OF STATUS REGISTER (CDS)” 





SEQ 0194 





Nis 


MAINDEC - 11 - OZCOB-B MACY11 27(654) 1-JUL-77 08:39 PAGE le3 


OZCOB.P it SEQ 0195 






EM60: .ASCIZ “DATA ERROR (BIT11) OF STATUS REGISTER (COS)” 


.ASCIZ “DATA LATE (BIT11) ERROR OF STATUS REGISTER (COS)™ 


saga 9 9373 


EM62:  .ASCII “NON-EXISTANT MEMORY (BITOS) ERROR OF STATUS” 


-ASCIZ <15><12>"REGISTER (CDS)” 


EM63: .ASCIZ “DISASTEROUS ERROR BUT NO ERROR BITS SET” 


EMG4: .ASCII “DATA PACKING (BITO1) OF STATUS REGISTER (CDS)” 


24. ef 


.ASCIZ <15><12>"NOT SET - IT SHOULD BE” 


PSELEL ELA 


ot Oe er 


-s 
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R 
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—~ 
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ad in 11 ~ O2ZC08-8 


a 





EMES: ASCII “SHOULD BE ADDRESSING BINARY DECK" 


Paint 


-ASCIZ <15><12>"PROGRAM DOES NOT AGREE” 


ES 
$333335355 


— >.) &) 4,, _— ~~ $2 t- 
eae a: Tyr 


33 


33 


EMG6: .ASCII “CONTENTS OF STATUS REGISTER (CDS) INCORRECT” 


Rost Se: 


-ASCIZ <15><12>" - SHOULD BE ZERO” 


7. rf 


EM67: .ASCIZ “ODD BUS ADDRESS CAUSED A TRAP IN NON-PACK MODE” 


ae 


= ENE 
ene f =, + 
— Nee 
he. ee Be: 


ESE ESESCSOCSS ES 


=~ s & om A —-_ 2 


sERROR ITEMS HEADER TA3LE 
DH1: .ASCIZ ™ (PC) (SP) (CDS)  (CDD) (PS)™ 


oo 
ry ; 
; Bea 
| 


DHe: -ASCIZ ™ (PC) (SP) (CDS) (CDD) (CDC) (PS)™ 





DH3: -ASCIZ ™ (PC) (SP) (CDS) <(CDD) (CDA) (PS)” 





SHER 
123 
1450 


SEG 0196 


yj = Ome a gree 


343%] 


; 


5 od 
- 
7 


at 


g33234% 
? 


ee ee ee ee 2 2 ee ee ee 
» 
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-ASCIZ ™ (PC) 


-ASCII ” (PC) 


.ASCIZ <15><1l2>” 


ASCII ™ (PC) 


-ASCIZ <15><12>" 





C16 


(SP) 


(SP) 


(SP) 


(CDS) (CdD) (CDC) (CDA) 


(CDS) <(CDD) (CDC) (CDA) 


(CDS) (CdD) (CDC) (CDA) 


WAS 


(PS)" 


(CDA) 


(CDC) 


(PS)" 


(PS)" 


SEQ 0197 


EE EEE ET = 
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200 Oo 


ASCII “ (PC) (SP) (CDS) <(CDD) (COD) (PS)" 


Pass 
ny 
a 
aa 
‘a: 
ai 
4 .ASCIZ <15><12>" WAS SHB” 
ZY 
Rue: 
Ra 
a 
my 
- EVEN 


;ERROR ITEMS DATA TABLE 
OT1: SERRPC , SREGE, STMPO, STMP1 , SREG7,0 
DTe: SERRPC, SREGE, STMPO, STMP1, STMPe, SREG7, 0 


DT3: SERRPC, SREGS, STMPO, STMP1, STMP3, SREG7, 0 
DT4: SERRPC, SREGS, STMPO, STMP1, STMP2, STMPS, SREG7 , 0 
OTS: SERRPC, SREGS, STMPO, STMP1, STMP2, STMPS, STMP4, SREG7,O 


DT6: SERRPC, SREGS, STMPO, STMP1, STMP4, SREG? , 0 
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SETUP: 


64S: 


HERLLETE 
«SUBROUTINE TO INITIALIZE CSR AND DSR POINTERS 


HHBBEEBHHBBBBBBBHBHBHEHHBBBHBH HB HHHHEEHEEE 


aL Goan Le 


BUS ADDRESS REG 


MOV 
MOV 

my fare one 

MOV INTVC42, (ADINT) SET UP CARD RERDER 

CLR JINTVC+2 1S AL 

CLR INTFLG t INITIALIZE I T FLAG 
CLR TRFLG s INITIALIZE TRACE FLAG 
MOV PR7.-(SP) ::PUT PS ON STACK 

MOV #64$, -(SP) ; ;PUT NEW PC ON STACK 

RTI -: POP NEW PC AND PS 

RTS PC sRETURN TO MAINLINE CODE 


oS SEE ESE SE SEER ESE SE SESE SESE SEE ESE SEE AES SEE EEE HEE HE HEE AE HEE EER EEE EERE EE 


6-H EE 
6-28 9 a a HE 


THIS MARKS THE BEGINN 


‘CON ENTS OF THE CARD 


me 
OOrucult wit 


O4S442 SOS 


~—.— 


NG 
OL 


OF THE MEMORY BUFFER AREA WHERE THE 
UMNS ARE DUMPED ON READ CYCLES 


Mlle lalaladalelalalalalalalalalel 
Ne lalallala lalalalalalelalalalalalalalalelele 
5 SE AEE HEE SE SEE EE A EE SE SESE A HE EE AE EE EH HEE EE 


BUFBEG: 0 
. END 


SEQ 0199 
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1216% 


1525 
3085 


2663# 


1623 
3463 


2664 


1273% 1298% 
1 1 7% 
3 
a bd 
3501% & 
3991 
1716 1814 
3590 3629 
2666 2967 # 


1912 
3746 
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COOB 4 001240 
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ss 
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_— 
wae 
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EE cut 
—— DO 
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sees 
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Peay sy 
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7% 
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: 
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<CO8. P11 CROSS REFERENCE THBLE SEQ O202 
4088 
gee = 43258 864264 
a4 ibe parte 26 26 28 2835* 2849% 297 
aso’ atex ace" CB. SABES Shas a re 
32098 
e418 e4ees 
1993 ee 
1 12168 
@. {072% 1082# 1114* 1131% 1964* 1985% 2511% 2525% 2668% 2674#  2756% 
314 oe 3017 3076 4«€©-«d9083—iGi(ii1P_—i 32D. 9H SS SHI? rhs 3544 
gi. 3775 38S (ai CTTTC=‘é‘SHY 4076 «6s 4120sC3e Sts 4457 
23628 
s 290 2963 
1808 : 
2417% 24el% 28258 
. &: G 
4377% 4 4 440S* 4416 4443 4445 4463 4S01% 
495 510 $17 S25 $33 S41 648 656 853 = 64698 


569 576 591 $99 607 ve $°6 563 $73 
711 719 727 735 743 751 759 6 84 
806 813 Bel 829 837 84S 861 64928 


S 


BeRSEAR EASES 


BARREL IED EEE 


3013% 3057x 4eS0% 4360% 4599%  4664* 
301 4360 


114 
433 496 S04 $11 518 S26 534 S42 649 657 854 656e8 
44 47e 65648 


y 

563 570 577 584 S92 600 608 616 623 Se bee 
7le 72 728 736 744 752 760 768 
814 Be 830 838 846 862 65708 


» 
_ 
o 
uw 
o 
se 


2987% 3030% 3031% Y223% Y42e4* 4333%  4334* 


i a 
ahi 
q 
: 


93 S954 ¢ 
501 59644 
5093 59778 
Sisé $9858 


59948 


S 
fo 
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PSSE ESS CE ae aR rhe eee ee ee 
SORT RAROMR DTS RTa LOO NIES ENS Se PERSP PE SUAS INS ABE RED aa 
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Saat dated tS 
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TABLE 


S416 


3131 


4919 4920 4921 

370 1468 1S66 1659 1757 18S5 
3ile 3iS6 3381 3478 3609 3763 
1354 1356% 1363 1439 1441 1452 
1 1637 1648 1650% 1652 1728 
sean 1848 1933 1935* i942 6591# 
e9s4* 2985* 3028% 3029% 4221% eek 
2575 2610 

26538 
2840s 

53804 

3543 3615 3699 3774 3854 3920 
3354 3482 36le 3931 3938 4051 


, 


1950 §=6e8004)=—ss 2073 

33927_-s 3940——s«“407771 

14S4e® = L461 1$37 

1730 1741 1743% 
43318 4332% 

4050 4075 4134 
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S4e4s 








K16 


MAINDEC - 11 ~- DZ2CDB-B MACYI1 — 1-JUL-77 08:39 °AGE 133 
CROSS REFERENCE T 





OZCOB.P11 SEQ 20S 
56908 
139) 908s 
41 # 
4133 a 
41 ; 
3765 S4378 
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CROSS REFERENCE TABLE SEQ 0206 





sor 2684s 
70 «= 2S 
4 Ley 


27748 
2682 2788 
2766 
e7le 2741 
2990 2991% 3034* 3035* 42e7% 4eeBe  4337% 4y928%  4929% 
S048* 434k W344" 43S1# 






af 
: 





4338% 
3041 4O4] # 
1 7 2170 18 : 2 16% 217 ¥ 
5517 e558 2566 : 33 
is oy ie Se Ge Be. Se SD, ae 
ie i8e0t 1388 1# W362 490o% yoo4# ‘ % 495 1% 
# 1 2536 2550 eS # * 
| 71% =e71 q xz 2631 coast ¥ 
71 73% 1 1 + t 
# 11% 14% 5 17% 18 720% ” cs z 7 
is Gals" Sass See. Gece dee eee Se es 
; 4 4 ie3y deste «u7Se | UBOL 
% seas * 877% 4 4948s 
udu 2182% 4778 4u780% 4781% 782% +4783 
it % “47 478S% 4787% 4789% 4790% 
udeie Bc dara Maree uoues 
4 ‘" oe 870% 871 2979% 2980% 
4 y326* 4327% 4 


4369 65858 
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02008. P11 CROSS REFERENCE TABLE 








3833 Jesse 3836 3837 3839% 3840% 3843% 3644* 3846 3847 3849 
1% sect 3865* 3866% #3868 3869 387 1% Ge g rs 
3887% 3890% 3891% 3893 38394 t # 
3976 3978% 3979% 3983% 3964 4 r! 
% 4000 4001 4003 44OO4# 4014 4] 4] 4162% 
Me, ar ich iam M Cay 4177% nT 4180 wet 4183% 4164# 
4253 deg a deeos Hg? 1 He7es 4 3 ‘275. ae d d dees 
Waeoe di?ee  uGeBe | BL ;  yeues 7% 64eer (eee 
4643 464S 4646 4663 4665% 46912 4692 4693% 4695 4696 4697% 
4703 4708 4710% 44712e% 4720% 4728 4729 4733 4769% 4770 
4777% 4778% 4779% #$£=(+47é8S 4810 ll ies 13% ny 4836% 4837% 
4840% 4Y841% 4842 4yB4S* 4858 2 4876 4877 
4880 4y6B8e%x 4883% 4900% 4901 4931% 4932% 4933% 493S*¥ 4936 
4946 4947 4948 4949 4950 495] 49S8% 6593% 65 
SPACE pues 2601 ree fo. Be pe 1 4465 4477 4480 53158 
TR O1a4ee Se 
014466 28008 2803 
14476 2739 280e8 
12730 2439 24878 
a heat iy 873 2983 3027 4220 4330 
T o 91 S32ebs 
ie , 1778 
S 9le2 3067 4300 4366 53198 
SWR 001136 3568 902% 2413 2430 2472 2474 2587 2607 
2724 2738 2753 2309 2957 3010 3012% 30S6*% 4247 4YOuge 
4264 4357 4359% 4374 4400 4402 4483 4491 4600 4607 4612 
4653 
G g00176 2328 902 30le 3056 4249 4389 
= 000001 2308 
= 1 2208 230 
set as 
= 
SWO3 = 2178 227 
= 2168 226 
= 2158 225 
z 2148 = 224 
: Size Be 
SWOS = ells 221 
SWil_ = 2298 
id = 2108 
ll = 2098 
le = 010000 208% 
RB: a 
= # 
SWISS = 205s 
= 2c8s 
= 10 
= 


FREE 
2ueS 





: 
} 


Satan 


au 


MAINDEC - 

OZCDB.P11 

SW7 == 900200 

SWB = 000400 
= 

Phirves pooord 

TCRLF = O00200 





Gays 
Seah 


pas 
iT 
pt 
7 
7 


oO 
F 


Se) 
Oo 
_— 
N 
os 
3 


ae 
8 


PEEPEEPEEEEEEE 
g°3 
arses 


~_ 
<£ 


gr 


8 
? 


NOUS WTO 
ag 
oO 


a bh Be be BP bas ben bo 
D 

Oo 

it 


AAAAAAS 


ee a ee 


AAA tt tt i 
ehh 


wage 
BRO Oooo 


atm 
gee 


a 


pees 


. 


a 


= atatatatm 


5083 


TPVEC 
TRACE 
TRAPVE 





e238 
eee8 
at 
§ 
4701 
e840x 
ae 
16% 
31 


tet 
Range 


Sneeeae 


ett 
= 
nie 


ae 


1224 


88S* 


e 


4478 
4481 


e432 
879% 


2994 


29698 
eSs8 


4497% 
44964 


e988* 
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2995% 


2581 


2989* 


COl 


3038% 


e671 


303e% 


3039% 


2689* 


3033% 


4231% 


2703 


4225% 


4232% 


2718 


422% 


4341% 


2813 


4335% 


434e% 


29718 


43362 


SEQ 0209 


U1 
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OZCDB. P11 CROSS REFERENCE TABLE SEQ G210 
TRAPX 932% 
TRFLG poizen ious 322 2384% 2422 2956% 6592x 
TRP 1 012440 2423 24308 
TRTRAP pele 309 399% 
TRTIVEC= 14 cb4e 
TSTART 015326 coise 2419% 2465 2524 2572 2578 2583 2673 e688* 2709 2715 2720 2812s 
TSTM1O 3920 4060 40638 
TSTMl2 3h 39228 
1 l 931 94448 
TST1O l2228 
Til 166 12718 
Tati DOSse2 fago0odauegaseOdeS LBZ 
13114 aoe000 1538 1540 1542 teep tees 15658 
TST1S e 1636 1638 1640 1651 1653 ¥ 
Talig 120 1729 1731 1733 1749 1751 # 
TSTl 1827 1829 1831 1847 1849 16548 
TST 98°48 
Stetes 1925 1941 1943 194948 
1 1 20038 
TST 011002 20728 
TST23 011362 21608 
T 011410 21788 
es Ai tuee 21958 
11466 e2les 
ae BS saan 
T 11542 22478 
TST31 011572 eeb4s 
TST32 fat 23618 
TS 161 30728 
TST 16250 31088 
terse OL FHM et 
terse 34768 
io i ise 
‘ T4l 1666 37598 
# 
¥ 
Pe ee 103s 1 1103% 
TST7 0034S 1134 11528 
TTY 27000005 
014SS4 2589 2726 28208 
T = 104404 2829 2834 2882 4460 4479 ay 49218 
T = 104400 Sle 913 914 915 916 918 919 920 3e3 $30 932 3933 1357 
1455 1553 1744 1842 is xe 2408 2601 2727 2732 2823 2824 2826 
2831 2836 2883 301 1 3061 3067 3076 3077 3078 3083 3113 
3114 3115 311é 3130 3131 3132 3199 3200 3201 3323 3324 3352 3353 
3354 3355 3415 3416 3417 3479 3480 3482 3483 3543 3544 3610 3611 
3612 3613 3615 3616 3699 3700 3764 3765 3766 3774 3775 3854 
3855 3928 3929 3930 3931 3332 3937 3938 3939 4O4S 4050 4051 40Se 


EQ] 
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02CDB.P11 CROSS REFERENCE TABLE SEQ 0211 
: . ws 107% ite 1120 1126 1129 1130 1132 1133 1134 1135 
dae 4 iced 4686 4 yee gees 4 
4560 4564 us 4602 4610 4704 4YB04 4881 49178 4954 
TYPOC = 1 1 4544 49188 
TYPON = 1 49208 
TYPOS = | 1359 1457 1555 1746 1844 1938 2598 2603 2729 2734 4467 4473 4919s 
T10GO O04 1255 125848 
T3 2 23568 
41138 4114 
41168 4117 
4298 43008 
3508 
3528 ~=«-:«871 2981 4218 4328 
385% 2383 4205 
RC 47158 4722 4731% 47368 . . 
_ rik ae cy (Sy 
SCMl1 = 10 368% 369% 3708 3718 3728 3748 375% 3768 
= . 3p8s 363 3708 3718 3728 373% f 375% 3768 
= 
SCMY = 600010 3768 $3778 3788 379% 3808 3818 3828 383% 384s 
sae 227 3878 4536 4555 4560 OGY 4610 4620 4705 # #4742 
527564 4847 4881 YBG3 ¢ 
015056 2876 2886 2894 29008 
4850 48gS# 
1 303 2889 28968 4615 
T 014774 882 28788 2992 3036 4229 4339 
015150 2880 239218 
1S165 920 930 933 2883 29248 
149736 2853 28678 
T O14766 882% 28758 2879 2992e% 3036% 422e9% 4339% 
G 001103 3418 4597% 4620 4627 449 46S51% 4668 
Ee 3478 4668 
1 876 2386 3030 4223 4333 45908 
1116 * 4542 4604% 4605 4606 4620 6562 #46564 =- 6567 #+4«+6570 #6573 °+#&6576 
001270 4268 4550 
tiie : 4603% 
me 1154 3648 4708 4742 
$F 1153 3638 4742 
001120 3498 
T OO01124 3518 
S016 28848 
= 1 20 2l 
SICNT 001104 3428 4657% 4658 4660% 4667 
ste 4928 9608 
z 1114 3468 4539 4YB06* 4620 
SLF 001230 388% 4620 4742 
SLOOP 015142 2914 29188 
aoe M108 zi38 896% 3006% 3050% 4e43x 4303 4353% 4663* 4665 4667 
SMAIL = £4482 U 907 3017 3061 Woouy 4364 4612 4663 4693 
SMXCNT O26504 4661 466748 





ee = 33 -@ 


SNULL 001152 

SNWTST= 000001 

Socnt 27144 

| 

7% 

001226 

SERRE 

C= SERERE 

N= RHRREH 

5° boiiee 

Go. porte 

G1 O01 ibe 

Ge 001168 

001166 

G4 001170 

G5 001172 

GB 001174 

G? 001176 

SRTRN 015140 

SREURES ; 
SSAVRE 


ne 
a a 


A 
a 
ul 
Saé 


ME 
STKB =: OD11 
$TKS O01142 
THPO) 8O«O 


3 
8 
: 


cccc 


cc 


Yl 
FE 


27(654) 
T 


4710 
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10508 
cat 
73% 
4794 
2920 
4337 


FOL 


: 


iad 
toe 
™N 


57% 
3600% 


48208 


4655 
49288 


4231 


6576 
6576 
300 1% 





2203 238 ‘ 


e565* 
6564 


6576 
6567 


14648 
2e44s 


15628 
e2bls 


4231 


esse 
6S73 


4233% 
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OZCOB.P11 


CROSS REFERENCE TABLE 
sTies 001204 3788 459S* 6564 6570 
Sips Solo i a A 
2bnes seeks SE7SR 
STMPS) 3 6 OOl2l2 381% * 2528% #2584 
STMPG6 001214 ®# 1164% #1165% #1166 
ce ee 
d54 1602% 1603% thi 
1710% 1711 1768 
soi?) 2odoe «2O4ie | 2OMe 
2e301% 230e% Bee Bate 
3193% 3194 3231% 323e% 
3319 3383% 3384 3385 
3511% 35l2e% 3513 3536%* 
3667% 3668 3691% 3692% 
3824 3847% 
ae eee “OP 
STMP7 OO01216 3838 
™ = 20% 941 94S 979 
1149 11538 1219 l2238 
16598 1753 17578 iF 
2175 21798 2192 21968 
S7ee a7e0e 3903 Saez 
are oot tap 3618 4118% a353. 4742 
LG 1155 3658 4687 4742 
STPS 001146 360% 4116 4726 4742 
Hig = ugoBs 49188 49198 15508 
TRPAD 4905 491648 
STSTNM 001102 3408 #2870% 4599 4620 
TYPBN= 4922 
STYPDOS 027150 48358 4921 
46878 4908 4917 
STYPEC 4707 4714 4721 47268 
720 473e 4734 4737 4% 
ne 
zee 026722 oo 4919 
iat Wages 4770% jj4774% #$=+4784 48198 
= £HEREE UJ 4609 4635 
‘ = 04S444 286% 290% 301 302 
872 896 2049 2118 
3465S 3545 35932 3701 
4S74# 4620 4667 4668 
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304 
2920 
3748 
4742 


eS: 


eae A 
Rags 


ie 


Tw 
— 
oa 
™“ 
We 


be ee ee 

— 
Sete ys) 
we vo 


bas bee 


ao 


<£ 
28s 
—_— me 


“0 
z 


SEQ 0213 

2204* e2222% 2239% 2256% 2353%  2500% 
le34e 1235% 1236 1283 1284 1285 
ise 51x sige seo. is77e eyes 
eye ievix eve. ieee ieee bay. 
ioe | 1807 1808% 1809 1 

1 1961 196e% 1963 2015*  2016* 
e109 2110% e2ii1 276% woe 
2e450% 2451 3167#  3168% 169 =: 3192% 
aT geSee# 3293 32H 3317%  3318% 
cal d43e S433 456% [457% a8 

9% 3583% 3584 3585 * 

3716 8 3739% 3740% 3741 3822%  3823% 
Jes4# 3895 3896 3976% 3977% 3978 
415e# 4193 4275* 4276 4277 “292% 
1027 10318 1050 10548 1100 11048 
13708 1464 14668 1562 1S66% 1655 
e000 200% e069 20738 2157 #2ibis 
ee3ie e244 22488 2261 ec65s 2358 
3SS5 3se H73 = 34778 36048 
4668 

3148 317% 3ele 3258 3378 389 
3006 30e6 4 3050 323 32S H18 
4011 4201 4219 4243 4329 4353 
4961 S8S9% 
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CROSS REFERENC 


OZCOB.P11 E TABLE 
ITAG 3298 
C 68 3738 e388 6600 
ENDCOM 7 e738 2395 #6611 
~ fe me 
1830 1334 1 1924 
ge gb 
e77e =—e776—i7BODC«é2?7'BHY 
3128 3137 3141 3145 
3338 3342 3359 3363 
3639 3643 3650 3654 
3960 4018 ee 026 
414939 4153) 4447s S13 
ESCAPE 2738 
GETPRI S# 1059 1116 1156 
1412 1471 1486 1496 
7 17 l Ri 
ae 1 
3 3423 3438 
ao 1 3731 3814 3829 
INT le688 1366 1464 1562 
ME OP e8568 2868 
MULT 273% 
NEWTST 68 3862738 )0—=— HH 979 
1753 1851 1946 2000 
3182 3345 473s: 3600 
e738 4876 4946 
a a ae 
moe ee i ie 
3173 ges? 3298 Ss: 3389 
PRIORD oanne iiee XE 1397 
pnt Ore iets 1300 1333 1431 
aut 1658 
PRIORH 1668 4266 
PRIORI 1678 4282 
PUSH e73e 864835 4930 
i ‘a 
1748 982 1007 
i ee ge 
| 3348 HH 3 
SETPRI ; 48 ae ase tee 
me be ie 
Ait soe elll 2278 
1 S410 83433 
3871 3896 3978 4003 
SETT 49088 4918 4919 4920 
SETUP 2738 868 2978 3022 


HO 1 
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im ratio 
BR 


oR 
S 


Bae 


3s 


eau ptr 
Ra Braeetase: 


e 


gaNeeS 


35 


ae 


_ 
Re 
= 
rv a) 


_ 
on 
“J 


csi 


at ed et od 
wow 


SNgaN 


Be: ReaSedSHOS 


@ 
fo 
Oo 


asgess i 


BERS ans 
baa Ea 


sags3 


— 
io 
=@ 


8 


Basces 


1562 
30693 


SEG 0214 


I01 
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OZCDB.P11 CROSS REFERENCE TABLE SEQ 0215 
Pp x 
sae iit 
STARS 4g 7 2738 86.297 a4] - 
1 1 180 1502 1149 fet l lee] 1 1254 13e6 et {HEE { {8g3 
1 1 1657 + 1753 S 1851 1853 1946 #1948 2002 2069 #2071 «+2157 #2159 
e176 e177 2192 e134 2203 2211 eee? eee 2244 2245 2261 2263 2358 2360 7 
4066 4527 4576 1 4669 4743 #4822 4891 4923 2 3 , : ops 2285 ee a6 : 2253 53 


= 

& 

gc 
“a 
‘ 


8978 30078 305 


374 375 

1 382 383 
00 1149 1219 1268 
92 — «vw 


: 
é 
e 


7 1050 
4064 


1655 1753 
3105 3152 


: 
: 
: 
: 





JOl 
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OZCOB.P11 CROSS REFERENCE TABLE SE@ O2i6 
ADD 893 2528 2557 2574 2580 e585 2677 = 2691 e702 = 2711 e717 —s 2721 e7ee 82794 
ces ais 2814 2?843 83003 83047 4240 4260 «= 44950045500 4697 «44177 4782 8=—s- 48S5 

ASL 4 4549 4904 

ee NG? 

BCC 4 4861 

BEQ 948 952 956 964 973 987 $94 1000 1010 1014 1019 1023 1033 1037 1042 
1046 1079 1096 lille 1342 1440 1538 1636 1729 1827 2143)si247—i2SP 2169s 2186 
ec03 3= e221 ec38 862255 e3Se 2382 2414 2473. «2479 2491 e499 «6 eS07_—i SBI? 
coae e640 2644 2648 2656 2659 SE, th 2749 sone 1 e775 «42779'—S ss e783ti‘éBBE 

e3$e7,—— e932 eSHHe_— si SSBCHLOOD 31 31 3148 18 «63e79_ ss sD HN 3370 

3469 «634980, ss 3S9G&——(i8P—_ GAS 3653 i036 37770 3779—tstié«éC3?7BAL 3809 3907 dike 3936 3945 
3950 3955 44017 Wel 4056 4060 407 4080 «6 4082 )=—sss4110—sisHlee CYL 4140 = 4142 
4265 4401 4495 644380 His‘ 2? 45S¢2 4557 4570 4898 4601 4650 4656 4700 4799 

BGE Sess ess3 4659 4734 

BG" eS e579 «2710s 2716 =Sss e803 Ss BE 446 «86 44BDG Ss BE 

BI 1190 1205 1309 1407 1505 1603 1696 1794 1892 = 241 e110 48623020 e4SO00sCiS1GSC«SS IL 
e565 °S34 2692 2873 2908 3193 3257 3318 3409 3457 3537 384 292 3740 38468 
3895 4002 4119 4192 4276 «= «443975 HHS 4796 49568 

BIS 985 1017 1040 1165 1235 1284 153 1382 1421 1480 1519 578 1617 1671 1710 
1769 1808 1867 1906 i962 §=6. 2016 ec77 ss 2316S eBIG 29313 168 3e3e 3293 3384 

BISp qae 3512 3559 3667 3715 3823 3870 3977 #+%;\'4167 4e93 4404 4801 4802 4863 4864 

BIT outa Pi 1095 du o130 2134 oj3 el4¥e 2381 2413 rr e472 8474 8 e478 OO4B1 
e748 862750 )08«6—e87530Cl 2757S 2759 ea Aa oPae cae eSe6 2s e331 2937 
e341 esS 862957 8€=63096 3100 «63118 3lek—( ieiSGRS—( <ésiT— iC IF OC Gs BGC(iéiéST 
S336 3340 S337 3365 saR8 soe er 3497 8 3622 3633 364! 348 83652 3776 
4059 4077 #4079 4 4 4 4139 4181 4264 4400 «86©0e 64434 4437 
i a a se a Ss 

BITB 4722 

BLE eSS9 =s_« 2704 

BLT e765 4713 4807 #84852 4868 

BMI 1089 1130 1141 1209 1344 1348 1355 i4We 1446 1453 1540 1S44 1551 1638 lo42 
1649 1731 1735 1742 1829 1833 1840 1927 1994 ele3) ele? Se eSHCBBCeS14 2523 
es4g9 2S63 2592 2614 fe 06etThhCCOS cPae esle  - eS3H—s 32S SH 210—s E14 32 
3275-3337 3362 8=— 3490 3638 3794 4O4G 4415 4859 

BNE 872 $11 $23 33S 1083 1132 1986 2131 el ei39s e423 1 e475 b4Be 4S 
e518 2521 2530 2538 2544 cae 7 one eS88 43s bbe 2651 2670 2679 
e687 8297 8=e2701 e707. 2719s ] 4 e e739—t—i‘éP8BPE 2910 e938 2950 
as - 3089 3093 3097 3119 i at 3329 a a oP ota = ca 
wos «gage | ae gt ee ue eggs GIS NGS Wie eae 
4654 4694 4702 8=6 4709 4723 8§=©64730 4797 4857s SHS 

BPL 960 1075 1092 1145 1199 1213 1254 | 1364 1430 1462 1528 1560 1626 1653 
1719 1751 1817 1849 1915 1943 2328 e e608 2739 3632 364% 3788 ##380e 3959 
. mk 41 ss 4114 4117 4150 4413 4417, 4YH4H_ 4B 44B4Y 45094130 CC4HEBB 727 

BR 892 901 S21 931 969 989 1081 1094 1134 1207 1255 1346 1362 1444 1460 
iS42 Lo38 1640 1651 1733 1749 1831 1847 1925 1941 1993 2049 e062 e118 £2371 
a 24 ne oa ah cae cae oy 2575 ti e616 2623 e628 ecb8e e7ile 
3418 3465 3545 3592 3701 3748 3856 3903 4011 4029 = 4126 i201 4239 i548 i381 
4349 4358 4423 84432 4439 4448 4471 4524 4545 4572 4638 4644 4647 4690 4706 


KO] 
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02CDB. P11 CROSS REFERENCE TABLE 
cr ‘gp pop ‘gee gos ‘ose toss 1072 1107 
oi iia i hk im i 
1e94 th: 1 1634 1644 1e4e tee 1438 
a Ce a a ee 
,) 
2161 $798 i87 o1% eis 231 s639 Bet 
a a a ns eee 
3184 3223 3238 # ##3248 3309 3375 
35e¢8 3550 3565 3575 3673 3683 3706 
3886 398 ##3983 ##+#+43993 4158 4173 #4183 #&#4Yei7 
4348 4352 4««4377tis«YSHE uunB «4 
Kipe 1337 "$54 "B57 Le 970 986 993 
8c 1343 1353 13630«61441 81951 ~—s_: 146 1 1236 
1750 1828 1838 1848 932 1942 1995 2050 
2754 2350 2351 2374 +#+2506 2517 ebee 
e578 40 s«a2SB81)0SsiCiDBSCiCiEY)0OssCi2710Sssi7BOCC2 
2981 14 3025 3058 S 3327 Hed 3467 
3751 3 3858  § 3905 4014 4030 4081 
4427 4430)_—sdgBtCé«NS;JL 1S 4464S 4658 4867 
CPB 2669 2706 2737 «ss Y#l2l)2=Ssis4l23.siwYHBCMHS 
2163 is 2911 
c HEF 2830 2835 #2874 4390 4462 4S46 
DEB Wie 4715 4794 4805 
HALT 230 917 2609 2740 2928 3117 3133 
4 4263 #4373 #+%4394 #4485 4523 4614 4617 
INC 1073 #1082 1110 1985 #2368 ###2477 «1225 2527 
2832 2842 285 2872 3087 3464 3591 
4988 4410 4411 4420 44e9 44s0 44HsS 4458 
INCE 4897 46622-4735 
JMP 295 315 318 32 326 2342 2385 2492 
2766 2768 40402788 «= (2319—Sts«é229S5 3021 
JSR 945 1055 1106 1153 1223 #4«le72 #1370 
3073 2265 2362 2436 2476 2535 2539 
3066 3075 #3ille 3156 #3351 #3478 3609 
4 4609 4707 4714 4?7e2]1 
MOV 3 873 874 875 87 877 978 879 
891 894 896 897 8998 9993 302 
37 965 974 998 1008 1031 1056 #1057 
1069 1084 #+$‘j.1085 1108 1109 1117 #2©«&31118 #1120 
1154 118? 11 1160 1161 1163 1164 1166 
11 11 il 1186 »3= Il 1189 1191 li 
lee? Ss «dleeB:Stsi‘i‘dk@3:C‘<éi‘édMBCOCti‘«‘*édE:C‘<‘iPNCOC«dLG—S~é‘édL 
1e51 1252 1259 1273 «#2412878 #@©1277 #&©®241279~—Ss«i1 280 
1295 1297 1298 1301 1302 1304 #«#«&+41305 #1307 
1321 1322 1324 1325 1328 £1329 «61330061334 
137513 1378 1380 1381 ##=#$413839 + « «©1384 #1389 





a 
Noo 
ue 


berets 28Sssnessee 


a 8 


Ww 
# 
a 


S 
o” 


Senos hase 
a 


asi 2 


> 


mess ROS 
Boma 


REPESS 
SIPES 


Fs 


- 


Si 
ri tat xb 


a 
Pose SAE 


Pa b= p= b= mae pee me pre Pe 
bh b= ps bs be be be pe 
me mt et pnt se pa pee 


GIG) 
Wu) 
Ou 
GW 


ys) 
Ww 


SEQ 0218 
1426 


LOl 
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CROSS REFERENCE TABLE 
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OZC0B.P11 


Pati akon PERSO NER MURILER Re Rea TaNNOnS CM OMeRRORBRS se 
ih a Bae RAS P RD Gee SANE LORE Raa RA NENTS RUMBA BS GeARES o> 
Toa a8 SN RSE RED SEE NRRL LRM e Raa aaNene eaM MMAR EeRESS > 
YASS CR Rene RGR GUNNER ROSE SoM NMOL E MEME OM ER SS 
TiaUo SESReRSBoIS SRE MRE RRO NESE NMR AE MMENEAT een ES: 
SE SHER E Ras ESS ee uINR MERON SR NOE ARMM ERE = 
z $F Un gsSR eR SRENS REN TREE RR CNRS NOM OR EMME ESR EA ES 
OG SUSRER Swe HER SURE CRC CRS Su NE Meee REE 
20 nO SSR RBdeo PERE CaN RMR RRR SR NOME UMAR RRR EES 
REEL E RaMSo PUR UR ae CRAMER RESUMES a aR aNRR TS 
zoe unndoon Came RON eR ue eR MRE Meee UNE OR AER OE 
Seretis Lastest cede het 
CREE RRL iS en ute eed in eS te 
maenecczeneeg: BSE Peace enn ee ane MUST sce 
See Li i rege ce Steir anh a ASE 


1423 
1478 
1S04 
188 


1414 fae 
1488 1496 
be ie 


4181 


1409 
1449 
1491 
tai! 
1598 
1853 


: 
SB a RMR R EE ARRRESR 


ee Oo ed ed Od et cmt ad edt 


AUSTERT RBA BROS 


Td ed ee aed eg Oe eo ed ed eg 


4175 


i 
e 
dg 
1S$9e 
1618 


SEQ 0219 


4771 
ee 


BAGecRuNeeny «© GeeNoss Feed BBY 
SRGeRineay «© Become Stree See 
Ss SRUSERGMAMED «© RRGRMS GRRRe One 
SS SRORERENSRRS «© ROSENBS Ra? OY 
23 SNGSBERNDaM? «© Esehiiae seaae 
#8 SMUSSEUNRMMS BORMERGMS Amer oe ee 
f SSUSSRGnaaes FORCaMNMS SouMT eens 


1641 


4770 


1341 


1445 
2487 
4508 4649 





=a $ EERE REN 
: TSR = - SEAR EEN GE cuRDEY 
: (REE sie 
ee ae ee 


Sderigesrauees G8 ebakieeg Ny eeaqcuteraetagsesnas 
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SEQ 0220 


NO1 


CROSS REFERENCE TABLE 
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OZ2CDB.P11 


“Aber 
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SEQ C221 
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SERGE ISIS] SEGMAUEREY 8 BRGY LESS SMEDG 
SSEQISGERIEDOOARE RERMESINSGDE E RAIERRMTEEG 8 
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COMERRTNOGET IRARERRCGINTS | ERQUSRCRANENNRAS 
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SREEAGERCSNTAGT CRSERERARRSIEED REQQPERRRRECAYG & 
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(| PME NE INS IE Rupee EISNER. 
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ERRORS DETECTED: 
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OZCOB.P11 


*DZCDB, DZCOB/CRF /SOL=DZCDB. P11 
RUN TRE. 8 25 4 SECONDS 
CORE USED: 20K 


EOF 1D2COBBSEQ 00010000 770920 POP10 411 


SEQ 0223 





